espero que alguien pueda ayudarme con este problema, me parece que es algo bastante básico pero en verdad no tengo mucha experiencia con esto y no logré solucionarlo por mi cuenta. A partir de una tabla original generé muestras con este código.
library("FactoMineR")
library("factoextra")
library(missMDA)
library(FactoInvestigate)
library(ggpubr)
library(cluster)
library(openxlsx)
library(dplyr)
datos1_2 = read.delim("TrueDim1_2ALL.txt")
datos = datos1_2[,3:21]
for (i in 1:1000){
assign(paste0("df", i), sample_n(datos,80))
}
pero necesito aplicar a cada uno de los nuevos set de datos la función imputeMCA
y posteriormente MCA
, cada una con sus parámetros correspondientes:
c1 = imputeMCA(df1, ncp = 5)
mca1 = MCA(df1, tab.disj = c1$tab.disj, ncp = 5, na.method = "Average", graph = F)
El problema es que no se hacer el código para que ambas funciones se apliquen de manera automática en un loop en los set de datos generados. Al intentar usar lapply
no pude agregar los parámetros de cada función y con for
no entiendo como hacer que la función reconozca cada data frame y comience a iterar.
Aquí hay un extracto de la tabla datos
defor1 defor2 defor3 defor4 hcronicas cicatriz tgranulacion compperinasal
1 defor1_1 defor2_1 defor3_0 defor4_0 hcronicas_1 cicatriz_1 tgranulacion_1 compperinasal_1
2 defor1_1 defor2_1 defor3_1 defor4_1 hcronicas_0 cicatriz_1 tgranulacion_0 compperinasal_0
3 defor1_0 defor2_0 defor3_0 defor4_0 hcronicas_0 cicatriz_0 tgranulacion_0 compperinasal_1
4 defor1_0 defor2_0 defor3_0 defor4_0 hcronicas_0 cicatriz_0 tgranulacion_0 compperinasal_1
5 defor1_1 defor2_1 defor3_1 defor4_1 hcronicas_1 cicatriz_1 tgranulacion_0 compperinasal_0
6 defor1_0 defor2_0 defor3_0 defor4_0 hcronicas_0 cicatriz_0 tgranulacion_0 compperinasal_1
7 defor1_0 defor2_0 defor3_0 defor4_0 hcronicas_0 cicatriz_0 tgranulacion_0 compperinasal_0
8 defor1_0 defor2_0 defor3_0 defor4_0 hcronicas_0 cicatriz_0 tgranulacion_1 compperinasal_0
9 defor1_0 defor2_0 defor3_0 defor4_0 hcronicas_0 cicatriz_0 tgranulacion_0 compperinasal_1
10 defor1_1 defor2_1 defor3_1 defor4_1 hcronicas_0 cicatriz_1 tgranulacion_1 compperinasal_0