10
我在R中创建了一个图形,并且需要创建一个行,其中一些值是预测。投影以虚线表示。下面的代码:在ggplot2中创建部分虚线
df = data.frame(date=c(rep(2008:2013, by=1)),
value=c(303,407,538,696,881,1094))
ggplot(df, aes(date, value, width=0.64)) +
geom_bar(stat = "identity", fill="#336699", colour="black") +
ylim(c(0,1400)) + opts(title="U.S. Smartphone Users") +
opts(axis.text.y=theme_text(family="sans", face="bold")) +
opts(axis.text.x=theme_text(family="sans", face="bold")) +
opts(plot.title = theme_text(size=14, face="bold")) +
xlab("Year") + ylab("Users (in millions)") +
opts(axis.title.x=theme_text(family="sans")) +
opts(axis.title.y=theme_text(family="sans", angle=90)) +
geom_segment(aes(x=2007.6, xend=2013, y=550, yend=1350), arrow=arrow(length=unit(0.4,"cm")))
所以我创建延伸从2008年到2013年。不过,我想2008至2011年的实线一条线,以及从2011年的虚线到最后。我只是做两个单独的线段,还是有一个单独的命令,我可以用来获得所需的结果。