code: def _prepare(self, sup_rows, sup_cols):
      self.sup_rows = sup_rows
      self.sup_cols = sup_cols
  
      n_components = 5
  
      # Fit Prince
      self.dataset = prince.datasets.load_beers().head(200)
      active = self.dataset.copy()
      self.famd = prince.FAMD(n_components=n_components, engine="scipy")
      self.famd.fit(active)
  
      # Fit FactoMineR
      R("library('FactoMineR')")
      with tempfile.NamedTemporaryFile() as fp:
          self.dataset.to_csv(fp)
          R(f"dataset <- read.csv('{fp.name}', row.names=c(1))")
          R("famd <- FAMD(dataset, graph=F)")
  
file_path: prince/tests/test_famd.py
imports: from __future__ import annotations
  import tempfile
  import numpy
  import pytest
  import sklearn.utils.estimator_checks
  import sklearn.utils.validation
  from rpy2.robjects import r
  import prince
  from tests import load_df_from_R
label_desc: Use image node_id 1 for calling the TestFAMD obj's underlying member method code with example usage: obj._prepare(sup_rows, sup_cols) without return types