r - ggplotly 无法显示 geom_line

Question

我正在尝试使用 plotly 构建交互式图表，但它无法显示 geom_line()，我不确定为什么。这不是我的确切示例，但即使是 plotly 网页上提供的示例也失败了。在这里:

library(plotly)
datn <- read.table(header=TRUE, text='
supp dose length
                   OJ  0.5  13.23
                   OJ  1.0  22.70
                   OJ  2.0  26.06
                   VC  0.5   7.98
                   VC  1.0  16.77
                   VC  2.0  26.14
                   ')

## This one works fine (original example):
ggplot(data=datn, aes(x=dose, y=length, group=supp, colour=supp)) +  geom_line() +  geom_point()
ggplotly()

## This one doesn't (modified the group):
ggplot(data=datn, aes(x=dose, y=length, group=dose, colour=supp)) +  geom_line() +  geom_point()
ggplotly()

在 ggplot 之后看起来像这样:

但是 ggplotly 看起来像这样:

什么给了？试过:The appliance of geom_line() in ggplot()和 ggplotly not displaying geom_line correctly无济于事。

更新:如果我省略颜色，线条会正确绘制:

ggplot(data=datn, aes(x=dose, y=length, group=dose)) +          
geom_line(aes(group=dose)) +  geom_point()
ggplotly()

所以我总是可以在 geom_point() 本身分配 geom_point() 属性，但为什么呢？

Answer 1

它完全按照您编写的代码执行操作。比如拿第一个，将aes()函数中的group参数完全取出来:

ggplot(data=datn, aes(x=dose, y=length, colour=supp)) +  geom_line()

您得到与之前完全相同的 plotly 。

在您的第二个示例中，您按 supp 着色，但按 dose 分组。例如，当 dose 为 0.5 时，长度为 13.23 和 7.98。图中有一条线连接点 (0.5, 7.98) 和 (0.5, 13.23)。由于您按 dose 分组，因此将根据 dose 组(即 0.5、1 和 2)绘制线条。