2012-06-01 61 views
1

我从模拟了一些成绩,我想做出像下面这个图一磨制的,我不知道是否有可能与GGPLOT2和facet_grid选项,以使此。使用facet_grid选项绘制数据帧的列与GGPLOT2

我对模拟结果有这种“简化”形式,一行由模拟:

dat <- read.table(textConnection("P1 P2 P3 P4 R 
1 2e-5 1.0 0.6 3 1 
2 4e-6 1.5 0.7 1.5 2 
3 6e-7 1.2 0.6 2.5 3 
4 8e-8 1.45 0.65 3.2 4 
")) 

在这里,你可以看到简单的图形,我想生产出GGPLOT2和facet_grid

graphic image ggplot2

我有一个参数面/图,不同的比例对应于我的每个参数的最小值/最大值......您还可以在此图形上看到颜色对应性,以在参数空间中定位每个模拟。

非常感谢帮助

SR。

+0

除了小错字(“06”,而不是“0.6”),我不认为你的意图图表数据相匹配。是否有额外的列或缺少列标题?事实上,它看起来像P1中的数据实际上在ID列中。 – joran

+0

谢谢,我纠正了错误。图形和数据是例如,所以数据并不真正代表简化的数字:) – reyman64

回答

4

这里是一个开始:

library(plyr) 
library(ggplot2) 
dat.melt <- melt(data, id.vars='R') 

ggplot(dat.melt, aes(x=0, y=value)) + 
    geom_boxplot() + 
    geom_point(aes(colour=factor(R))) + 
    facet_wrap(~variable, ncol=1, scales='free') + 
    coord_flip() 

其他调整充沛,但要点是存在的。通常好的第一步就是将数据长一些,然后开始摆弄。作为一个侧面说明,它是一个好主意,因为它是一个内置函数,所以避免使用data作为变量名称。

+0

谢谢,我有一些问题修复xscale与ggplot2和facet选项,所以我发布了一个新的问题在stackoverflow http://stackoverflow.com /问题/ 10869540 /重叠和固定-X-秤式小面横向扩展的自由有序对做-A-膜 – reyman64