Question

我正在尝试运行因子分析，并用NA替换所有加载值＆lt; =。3。当我在下面运行我的代码来替换值时，我得到的输出是一个巨大的列表，而不是我预期的矩阵：

#Example using @Hack-R code
#install.packages("pacman")
require(pacman)
pacman::p_load(psych)

#using the Harman 24 mental tests,a built-in dataset
res <- fa(Harman74.cor$cov,4,rotate="promax", SMC=FALSE, fm="minres") #unweighted least squares is minres

#round output (For rounded output, the print.psych function defaults to 2 digits)
#roundedVals <- print.psych(res)

#write to CSV
write.csv(res$Structure,"fa_all_rounded_promax.csv",row.names=T)

返回一个矩阵。如何在此矩阵中用NA替换所有值＆lt; = .3？

我试过了：

roundedVals[(is.numeric(res$Structure) & res$Structure<.3)]<-NA

但是它没有返回矩阵（这是我的目标），尽管它确实取代了值。

Answer 1

XDocument myXML = new XDocument(
                  new XDeclaration("1.0","utf-8","yes"),
                  new XElement(ns + "Root",
                     new XElement(ns + "abc","1")))

替换object中的值，发出保留对象结构

1 个答案: