意外的自动插补

时间:2015-07-28 07:34:47

标签: r ggplot2

我正在尝试绘制3个不同的横截面,这些横截面将由某个因素着色。这一切都很好,但由于某种原因,geom_line()函数无法通过因子中断绘制的线。到目前为止,这是我的代码(我已经删除了所有代码解释):

library(ggplot2)

qpbase_soll <- ggplot(qps_soll, aes(X, Ysoll))
qpbase_soll <- qpbase_soll + geom_line(aes(color = Katsoll), size = 1) + facet_grid(Profil ~ .) + labs(x = "Horizontaldistanz [m]") + labs(y = "Höhe über Meer [m]")

farben_qp2 <- c("red", "darkgreen", "orange", "lightgreen")
qpbase_soll <- qpbase_soll + scale_colour_manual(values=farben_qp2)

qpbase_soll <- qpbase_soll + coord_fixed(ratio=2/1)

qpbase_soll <- qpbase_soll + scale_x_continuous(breaks=c(0,5,10,15,20,25,30)) + scale_y_continuous(breaks=c(630:637))

library(grid)
qpbase_soll <- qpbase_soll + theme(panel.margin = unit(1, "lines"))

qpbase_soll <- qpbase_soll + labs(colour= "Oberfläche")
qpbase_soll <- qpbase_soll + ggtitle("Querprofile SOLL-Zustand") + theme(plot.title= element_text(face="bold"))

kommentar_y4 <- data.frame(X = 23, Ysoll = 635, lab = "Alle Y-Achsen zweifach überhöht", Profil = factor("QP2"))
qpbase_soll <- qpbase_soll + geom_text(data = kommentar_y4, label = "Alle Y-Achsen zweifach überhöht", size = 3.0, color = "darkgrey") 

qpbase_soll

我的data.frame()包含X和Y值,以及根据应接收的颜色所有这些位置的类别。因此,对于所有类别,实际上应该中断该行。数据表包含以下条目:

Profil    X    Ysoll    Katsoll 
   QP1  0.0    636.4    Terrain
   QP1  0.5    636.3    Terrain
   QP1  1.6    638.5    Feldweg
   QP1  1.8    638.5    Feldweg
   QP1  2.0    639.1    Terrain  
...

我做错了什么?

0 个答案:

没有答案