Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/72.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
无法在R中绘制PCA数据。分数是否由给定的对象/名称定义以专门绘制?_R_Object_Plot_Pca - Fatal编程技术网

无法在R中绘制PCA数据。分数是否由给定的对象/名称定义以专门绘制?

无法在R中绘制PCA数据。分数是否由给定的对象/名称定义以专门绘制?,r,object,plot,pca,R,Object,Plot,Pca,我已经完成了一个简单的PCA功能,使用的代码是通过机构传递下来的。它输出分数、载荷、特征值、%特征值、#主成分、列平均值、标准偏差,最后是起始数据。在输出文件中,分数在显示分数之前用[[1]]标记。我试图绘制这些分数,但我不确定如何从这一点上获取数据。我假设它被分配给这个[[1]]或者代码中定义这些分数的某个东西。这一行代码如下所示: "#"perform pca on x x.svd <- svd(x); x.R <- x.svd$u %*% diag(x.svd$d);

我已经完成了一个简单的PCA功能,使用的代码是通过机构传递下来的。它输出分数、载荷、特征值、%特征值、#主成分、列平均值、标准偏差,最后是起始数据。在输出文件中,分数在显示分数之前用[[1]]标记。我试图绘制这些分数,但我不确定如何从这一点上获取数据。我假设它被分配给这个[[1]]或者代码中定义这些分数的某个东西。这一行代码如下所示:

 "#"perform pca on x
 x.svd <- svd(x);
 x.R <- x.svd$u %*% diag(x.svd$d);
 x.C <- t(x.svd$v);
 x.EV <- x.svd$d * x.svd$d
 x.EVpct <- x.EV/sum(x.EV);
 x.EV <- x.EV[1:sm];
 x.EVpct <- x.EVpct[1:sm];
 x.CumEVpct <- x.EVpct;
“#”在x上执行pca

x、 svd最简单的方法是:

pc <- prcomp(x)
plot(pc$x[, 1:2]

pc你真的不清楚你在问什么。你的绘图命令是什么?你想制作的情节是什么样的?还有,有没有什么特别的原因让你手动执行SVD而不是使用
?prcomp
?@C8H10N4O2是的,就使用R而言,我会说我和一袋石头一样有用。但我正在学习。一位上级给了我代码,我试图用plot(x[,1],x[,2])绘制散点图,其中x是分数,但我不知道如何将分数放在那里。在我给出的代码中,它们没有定义为变量。我想那是我的问题。我也不确定这个prcomp命令。为了简单起见,看起来你和咖啡因是正确的。然而,我被告知使用我必须使用的代码。幸运的是,我能够找出包含我需要的分数数据的部分,并绘制了它。很抱歉给你带来了困惑。