Question

我有一个包含17行和40列的data.frame（df）。我想绘制所有这些列：

windows()
plot(NULL,xlim=c(0,17),ylim=c(5000,90000),xaxt='n',xlab="", ylab="")
points(df$c1,type="b",pch=15,col="gold3")
points(df$c2,type="b",pch=15,col="gold3")
.  
.
points(df$c40,type="b",pch=15,col="gold3")

我想在绘图中创建一个循环，而不必为40列写入所有行。我尝试了不同的事情没有成功。提前谢谢！

Answer 1

以下是使用标准plot和points以及ggplot2示例的示例。

df <- data.frame(x=1:10,
       y1=rnorm(10),
       y2=rnorm(10),
       y3=rnorm(10))
plot(df$x, df$y1)
# points(df$x, df$y2)
# points(df$x, df$y3)
for(i in 3:4) {
  points(df$x, df[[i]])
}


library(reshape2)
library(ggplot2)
melt_df <- melt(df, 'x')
ggplot(melt_df, aes(x, value)) +
  geom_point()

在多个点的图中循环（）

1 个答案: