Question

出于某种原因，如果我尝试使用以下代码显示数据，我会将轴设置为正确，但实际数据不会绘制。有什么建议吗？

par(bg="lightgray")
adates <-as.Date(row.names(try),format="%Y-%m-%d")
plot(try[,1],x=adates,type="o",axes=FALSE, ann=FALSE)
usr <- par("usr")
rect(usr[1], usr[3], usr[2], usr[4], col="cornsilk", border="black")
lines(try[,1], col="blue")

axis(2,col.axis="blue",,at=pretty(try[,1]),las=1,labels=sprintf("$%1.0f",pretty(try[,1]/1000)),cex.axis=.75)

axis.Date(1, at=pretty(adates), label=format(pretty(adates),"%y"))
box()
title(main="This is a graph", font.main=4, col.main="red",xlab="Date",ylab="$ (in $1000s)")

Answer 1

忘记所有其他代码，看看

plot(try[,1],x=adates,type="o",axes=FALSE, ann=FALSE)

绘制的第一个参数是向量x坐标，在本例中为try[,1]。然后，您使用x=adates提供另一组x坐标。所以现在你有两组x-coords但没有y-coords。

在R中指定轴时不显示数据点

1 个答案: