0

当我绘制一个 facet_wrap() 并将下降线放在 x 轴上时,它们只出现在第一个方面。我做错了什么还是这是一个错误?MWE:

library(plotly)
library(ggplot2)

gg<-ggplot(data = iris,
       aes(x = Sepal.Length,
           y = Sepal.Width,
           color = Species,
           group = Petal.Width,
           text=sprintf("Petal Width %s<br>Sepal Length: %s", Petal.Width, Sepal.Length)
       ))+
    geom_point()+
    facet_wrap(~Species)

ggplotly(gg,tooltip = "text")%>%
    layout(xaxis = list(showspikes = T))

方面 1 中的垂线: 刻面 1 中的垂线 方面 2 中没有垂线: 方面 2 没有下降线

4

1 回答 1

0

我认为您必须共享 x 或 y 轴。所以你可以尝试:

gg<-ggplot(data = iris,
           aes(x = Sepal.Length,
               y = Sepal.Width,
               color = Species,
               group = Petal.Width,
               text=sprintf("Petal Width %s<br>Sepal Length: %s", Petal.Width, Sepal.Length)
           ))+
    geom_point()+
    facet_grid(Species~.)

ggplotly(gg,tooltip = "text")%>%
    layout(xaxis = list(showspikes = T))

或者

gg<-ggplot(data = iris,
           aes(x = Sepal.Length,
               y = Sepal.Width,
               color = Species,
               group = Petal.Width,
               text=sprintf("Petal Width %s<br>Sepal Length: %s", Petal.Width, Sepal.Length)
           ))+
    geom_point()+
    facet_wrap(~Species)

ggplotly(gg,tooltip = "text")%>%
    layout(yaxis = list(showspikes = T))
于 2018-03-24T14:10:17.377 回答