小编R-M*_*Hup的帖子

我正在尝试在ggplot2中制作甘特图.我在更改geom_segment()中每个段的颜色和间距时遇到麻烦

> head(g672)
mobility    start  endtime
1    active  0.00000  1.60157
3    active  1.60157 59.65837
5    active 59.65840 68.93415
7  immobile 68.93420 69.03430
9    active 69.03430 77.87629
11 immobile 77.87620 80.27855

我正在使用geom_segment()来生成图表:

ggplot(g672, aes(colour=mobility)) + 
  geom_segment(aes(x=start, xend=endtime, y=mobility, yend=mobility), size=15) +
  xlab("Duration") +
  theme_classic()

这会生成此图表:

我希望能够做两件事:1)改变颜色和2)使2条看起来更接近或甚至让它们都重叠(这些是相互排斥的类别,所以如果你不做一个,你在做另一个).

欢呼和感谢任何建议

导出为PDF后,我不断获得这些白线.它们在R中不可见,但一旦导出就会显示.这似乎也是一个特定于mac的问题.导出到tiff时不会出现问题.

数据:

> dput(head(newdemodf1,10))
structure(list(x = c(21L, 22L, 22L, 22L, 22L, 22L, 22L, 22L, 
22L, 22L), y = c(27L, 26L, 27L, 28L, 29L, 30L, 31L, 34L, 35L, 
36L), totaltime = c(0.0499999523162842, 0.0499999523162842, 0.379999876022339, 
0.0500004291534424, 0.0299999713897705, 0.109999895095825, 0.0499999523162842, 
0.0299999713897705, 0.0500001907348633, 0.0299999713897705)), .Names = c("x", 
"y", "totaltime"), row.names = c(NA, 10L), class = "data.frame")

library(ggplot2)
library(RColorBrewer)

ggplot(newdemodf1) +
  stat_density2d(aes(x=x, y=y, z=totaltime, fill = ..density..), 
                 geom="tile", contour = FALSE) +
  scale_fill_gradientn(colours=cols) 

然后我导出到PDF导入adobe illustrator.但是,我得到的情节如下:

如何删除白线？这是否涉及平滑颜色？或以某种方式更换瓷砖？缺少x,y组合？任何帮助赞赏.