r - geom_segment() x 轴上的不同起始值

Question

ggplot(int_times,aes(x=-stim ,y=num,colour=gene)) +
       scale_y_continuous(breaks=int_times$num,labels=int_times$gene) +
       geom_segment(aes(xend=stim,ystart=num,yend=num),size=5) +
       xlab('IW (min)') +
       ylab('Genes') +
       opts(title='multi')

整数次:

  gene    lag   stim  num
 Pcsk1  46.53 173.53    1
serpin2 83.00 208.02    2
  Bdnf  33.00 277.02    3
 Fosl2  49.00 266.03    4
  Pax1  33.59 243.56    5
  Acan 188.49  70.30    6
 Pthlh  50.00 271.45    7
   Crh  35.00 359.06    8

这就是我现在所拥有的


我想要的是 y 值“stim”从它们相应的“滞后”开始，而不是从 0 开始。

我以为你可以在 geom_segment 的 aes() 中做一个 xstart=lag ，但这对我不起作用。

有什么帮助吗？

Answer 1

试试这个(我在导入数据时命名了不同的数据):

ggplot(dat,aes(x=-stim ,y=num,colour=gene)) +
       scale_y_continuous(breaks=dat$num,labels=dat$gene) +
       geom_segment(aes(xend=lag,ystart=num,yend=num),size=5) +
       xlab('IW (min)') +
       ylab('Genes') +
       opts(title='multi')

但是从你的问题来看你的意图仍然很不清楚。你指的开始和结束 y值，但您肯定是指 x ?条形的起始值是从 -stim 继承的。传递给 x在 ggplot .我只是通过了 lag作为终点。

如果您真的希望条形图从 lag 开始，那么你应该删除 x = -stim来自 ggplot并简单地在 geom_segment 中传递开始和结束值. (事实上​​，这可能是一个好主意。)