如何在R中制作两列的散点图

Question

我正在尝试制作两列（V13 和 V21）的散点图。我想要 x 轴上的行号和 y 轴上的每一列 - 在同一个图中。所以每一列都有自己的一组 y 值。我希望行号位于 x 轴上。然而，当我去绘制这个时，我得到了这个：

xy.coords(x, y, xlabel, ylabel, log) 中的错误：“x”和“y” 长度不同

我正在使用的数据框称为“Vs.highvar”。数据有 1000 个 obs 的 2 个变量，我希望 x 轴是行数（1000），所以我想这就是问题所在。我该怎么做呢？我是否必须将数据拆分为两个单独的列/两个单独的数据框？我对 R 很陌生。我试过 split()、separate()、plot()、ggplot2.scatterplot()、scatterplot()。

到目前为止的代码：

Vs <- read.csv(file="x.csv", 
               header=TRUE,
               fill=TRUE)

#find variables with largest variance 
head(Vs)
variances <- apply(X=Vs, MARGIN=2, FUN=var)
sortedvars <- sort(variances, 
                   decreasing=TRUE, 
                   index.return=TRUE)$ix[1:2]

Vs.highvar <- Vs[, sortedvars]
Vs.highvar #returns variables V13 and V21

#create scatterplot
plot(nrow(Vs.highvar), Vs.highvar$V13, 
     main="Variances")

Answer 1

我不确定您希望情节如何。不过，您总是需要相似数量的 x 和 y 值。 nrow(Vs.highvar) 是一个数字。

如果 x 轴应该是一个运行数字（一个计数器），那么您需要一个序列，您可以使用 1:nrow(Vs.highvar) 获得该序列：尝试 plot(1:nrow(Vs.highvar), Vs.highvar$V13, main="Variances")。

（否则，如果您想对多个 y 值使用相同的值，则需要复制总行数（ nrow(Vs.highvar) ）。您可以使用 rep() 函数执行此操作。 试试：plot(rep(nrow(Vs.highvar), nrow(Vs.highvar)), Vs.highvar$V13, main="Variances")。

此外，还有带有参数add 的points() 函数。当设置为 TRUE 时，您可以将第二个数据系列（=表格的列）添加到现有绘图中。

plot(1:nrow(Vs.highvar), Vs.highvar$V13, main="Variances")
points(1:nrow(Vs.highvar), Vs.highvar$V21, add=T)

编辑：我重组了上面的文字。