如何在R中生成三维条形图?
这是我的data.frame如何在R中生成三维条形图?,r,bar-chart,R,Bar Chart,这是我的data.frame > head(dat) word value number name 1 10 0.001 30 gi|378283288 2 15 0.001 17 gi|378283288 3 20 0.001 16 gi|378283288 4 25 0.001 14 gi|378283288 5 30 0.001 12 gi|378283288 6 10 0.010 38 gi
> head(dat)
word value number name
1 10 0.001 30 gi|378283288
2 15 0.001 17 gi|378283288
3 20 0.001 16 gi|378283288
4 25 0.001 14 gi|378283288
5 30 0.001 12 gi|378283288
6 10 0.010 38 gi|378283288
> tail(dat)
word value number name
120 30 0.5 27 gi|378285158
121 10 1.0 34 gi|378285158
122 15 1.0 31 gi|378285158
123 20 1.0 27 gi|378285158
124 25 1.0 27 gi|378285158
125 30 1.0 27 gi|378285158
我想用条形图表示它。我探索了这些选项,但还没有成功,因为我想展示所有四列<代码>值可以用作X轴
,字
可以用作y轴
,名称
可以用作Z轴
。那么如何在这里使用number
这样的图形可能会有帮助,我可以使用
图例中的色标来表示数字
现在,我的问题是,如何在R中生成这个图?这是展示我的数据的正确方式吗?我会这样做:
library(ggplot2)
theme_set(theme_bw())
theme_update(strip.background=element_rect(colour="white"))
cities <- c("Beijing", "Hong Kong", "Macau", "Nanjing")
measures <- sprintf("Particle %s", toupper(letters[1:8]))
df <- data.frame(expand.grid(city=cities, measure=measures))
df$value <- rexp(nrow(df))
p <- (ggplot(df, aes(x=measure, y=value, color=measure, group=city)) +
scale_color_discrete(guide=FALSE) +
geom_point() + facet_wrap(~ city) +
geom_line(color="grey", alpha=0.5) +
xlab(""))
p
库(ggplot2)
theme_set(theme_bw())
主题更新(strip.background=element(color=“white”))
城市你问题的第一部分
针对您问题的第二部分“这是展示我的数据的正确方式吗”:
,和。可能想亲自查看软件包VRMLGen
(),我发现三维条形图令人困惑。我会用一个刻面的常规条形图来代替。例如,ggplot(mtcars,aes(factor(cyl),fill=factor(am)))+geom_bar()+facet_grid(am~vs)
@shadow:我同意,理解三维图需要时间。但是,三维图非常适合进行比较。在上面的一篇文章中,香港和北京很容易比GGTPLE更具可比性。这是一个很好的理由,为什么视觉设计师会对它们感到沮丧:它们真的很难阅读。例如,磺胺二甲嘧啶在杭州的价值是多少?实际上,只有后排可以被解释,并给出透视旋转,即使这很困难。要添加到合唱中,您在该示例中得到的是TMI(太多信息)。更重要的是什么,例如,按类型或按城市划分的化学品使用情况?或者总的(而不是按类型)化学品使用量等?想想你希望你的听众收到的信息。