
Last chance! 50% off unlimited learning
Sale ends in
## create two factors
f1 <- factor(sample(300,400,replace=TRUE))
f2 <- factor(sample(300,400,replace=TRUE))
## find the components
cf <- compfactor(list(f1=f1,f2=f2))
## show the third largest component
fr <- data.frame(f1,f2,cf)
fr[cf==3,]
Run the code above in your browser using DataLab