Question

这部分与我的

So here is the data and a plot created in 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")))

有可能在以下图表中以批号2 制作冷静趋势线。

I had created the plot in R and then made prettied it up in Adobe Photoshop, and I m wondering if could have produced that squiggly trend line straight in R.

If this can t be done in ggplot2, are there any specific R packages which would be amenable to this task?

I m not asking about reproducing the graph. That s not an issue. Just producing the trend line seems to be an issue.

Answer 1

As per all the comments: the squiggly line is scientifically dubious, since it isn t based upon a statistical model of the data. (And it appears to show the number of smartphone users levelling off, when the data shows no such thing.) So the best advice is "don t do it".

既然你似乎真心希望这一想法,那是可能的。

You can add any line you like with geom_line. To replicate the silly line in your infographic, you could do a straight line plus a sine curve for give it wiggle. Assuming your plot was named p

p + geom_line(
  aes(date, value), 
  data = data.frame(
    date = seq(2008, 2013, length.out = n),
    value = seq(600, 1300, length.out = n) + 100 * sin(seq(0, 4 * pi, length.out = n))  
  ), 
  arrow = arrow(length = unit(0.4, "cm"))
)

一种更好的办法是利用一个能够顺利治愈的曲线。

p + geom_smooth(method = "loess", se = FALSE)  #maybe also span = 0.5, for extra wigglyness.

Answer 2

回答你的问题显然是:R.R.没有做到这一点。如果你使用一些病媒图谱方案,你就能够更快、更接近你想要的东西。使用图解器、因纽克(自由)或你喜欢的任何图形工具。或许你们也想在R中创建图表,并在其中一项方案中后来加以修改。

我可以理解这些评论,也同意本图不会通过一些测试。不仅有学术测试,而且有看管-无uck-ine-ine-test。提及Edward Tufte也是出于美学原因。然而,我认为这是一个不值得 down表决的遗留问题,只是因为图谋 looks。有时,学术界也需要在学术期刊之外出版他们的剪辑,而图象最终由大众编辑编辑。因此,事先知道——最好不要试图与R一道做这样的 st。

友情链接