df <- data.frame(
date = seq(Sys.Date(), len=100, by="1 day")[sample(100, 50)],
price = runif(50)
)
df <- df[order(df$date), ]
dt <- qplot(date, price, data=df, geom="line", color="blue")
dt
有什么问题?
答案 0 :(得分:1)
将color =“blue”改为:
colour = I("blue")
正如@joran正确提到的那样,最好这样做:
ggplot(data=df, aes(date, price)) + geom_line(color="blue")