使用 plotly 创建填充区域线图答案

【问题标题】：Create a filled area line plot with plotly使用 plotly 创建填充区域线图
【发布时间】：2019-08-17 00:21:13
【问题描述】：

我想使用这个数据集创建一个基本的填充区域图：

week<-c(2,1,3)
pts<-c(10,20,30)
wex<-data.frame(week,pts)

x 轴应包含 week，正如您所见，它在数据集中可能不是按顺序排列的，但必须在绘图的 x 轴上按顺序排列。 y 轴应包含pts。

由于某种原因，我没有采取任何结果，但似乎没有错误存在。

library(plotly)
week<-c(2,1,3)
pts<-c(10,20,30)
wex<-data.frame(week,pts)

wex$week <- factor(wex$week, levels = wex[["week"]])
p <- plot_ly(x = ~wex$week, y = ~wex$pts,
             type = 'scatter', mode = 'lines',fill = 'tozeroy')


p

【问题讨论】：

标签： r plotly

【解决方案1】：

x 轴上的值必须是数字 (see example) 并且是有序的。

wex <- wex[order(wex$week), ]

# wex$week <- factor(wex$week, levels = wex[["week"]])
plot_ly(x = ~wex$week, y = ~wex$pts, type = 'scatter', mode = 'lines', 
        fill = 'tozeroy')

【讨论】：

【解决方案2】：

如果您想保留 x 轴，这将起作用，但这不是纯粹的 plot_ly 答案：

p <- ggplot(wex, aes(x = week, y = pts)) + 
  geom_point() + 
  geom_line() + 
  geom_ribbon(aes(ymin = 0, ymax = pts), fill = "blue", alpha = .6, group = 1) 
g <-  ggplotly(p)
g

【讨论】：