R中有多行的不完全绘图
在R中使用base plot函数绘制几条线时遇到问题。当我设置type='o'时,绘图会显示所有值,但当我将其设置为'l'时,什么也不会显示。我想要一条干净的线,显示没有点的每一条线 我试过ggplot,但它没有覆盖绘图的顶部 谁能告诉我为什么会这样 以下是源代码、数据示例以及类型为“o”和“l”的图形:R中有多行的不完全绘图,r,plot,ggplot2,R,Plot,Ggplot2,在R中使用base plot函数绘制几条线时遇到问题。当我设置type='o'时,绘图会显示所有值,但当我将其设置为'l'时,什么也不会显示。我想要一条干净的线,显示没有点的每一条线 我试过ggplot,但它没有覆盖绘图的顶部 谁能告诉我为什么会这样 以下是源代码、数据示例以及类型为“o”和“l”的图形: plot(range(c$Date), range(c$`Citibank Share Price`,na.rm=T), type="n", xlab="Year", ylab="R
plot(range(c$Date), range(c$`Citibank Share Price`,na.rm=T), type="n", xlab="Year",
ylab="Ratio to Jan. 1923 Price (Jan. 31 1923 Price =1)" )
color <- c('yellow','blue','green','black','grey','red')
# add lines
for (i in 2:dim(c)[2]) {
lines(c[,1], c[,i], type='l', lty=.1,lwd=.5, col=color[i-1])
}
legend('topleft',legend=c('DJIA','S&P Ind.','S&P Banks','S&P Rail.','S&P 500','Citibank'),col=color,pch=1)
ggplot代码
colnames(c)[-1] <- c('DJIA','S&P_Ind','S&P_NYC_Bank','S&P_Rail','S&P500','Citibank')
c <- melt(c, id.vars='Date')
ggplot(data=c, aes(x=Date,y=value,color=variable, group=variable)) + geom_line()
colnames(c)[-1]你能把你的全部数据发布到某个地方吗?看起来你的问题可能是lty=.1
。将.1
更改为1到5之间的整数。(供参考,如果需要,您还可以使用其他方法指定更广泛的线型;例如,请参见。该示例使用ggplot2,但您可以在基本图形中以相同的方式指定线型。)
colnames(c)[-1] <- c('DJIA','S&P_Ind','S&P_NYC_Bank','S&P_Rail','S&P500','Citibank')
c <- melt(c, id.vars='Date')
ggplot(data=c, aes(x=Date,y=value,color=variable, group=variable)) + geom_line()