Наложение линии на диаграмму с областями с накоплением в R-plotly - PullRequest
Новая
       45

Наложение линии на диаграмму с областями с накоплением в R-plotly

0 голосов
/ 27 мая 2020

Есть ли способ наложить линию на диаграмму с областями с накоплением в Plotly R? Вот пример кода, но он не дает мне именно того, что я хочу. Я хочу, чтобы линия не накладывалась на диаграмму с областями, а была отдельно. Это похоже на проблему спроса и предложения. 

library(plotly)

data <- t(USPersonalExpenditure)
data <- data.frame("year"=rownames(data), data)
data$test <- 200

fig <- plot_ly(data, x = ~year, y = ~Food.and.Tobacco, name = 'Food and Tobacco', 
                type = 'scatter', mode = 'lines', stackgroup = 'one', fillcolor = '#F5FF8D')

fig <- fig %>% add_trace(y = ~Household.Operation, name = 'Household Operation', 
                          fillcolor = '#50CB86')

fig <- fig %>% add_trace(y = ~Medical.and.Health, name = 'Medical and Health', 
                          fillcolor = '#4C74C9')

fig <- fig %>% add_trace(y = ~Personal.Care, name = 'Personal Care', 
                          fillcolor = '#700961')

fig <- fig %>% add_trace(y = ~Private.Education, name = 'Private Education', 
                          fillcolor = '#312F44')

fig <- fig %>% layout(title = 'United States Personal Expenditures by Categories',
                      xaxis = list(title = "", showgrid = FALSE),
                      yaxis = list(title = "Expenditures (in billions of dollars)", 
                                   showgrid = FALSE))

fig %>% 
  add_lines(x= data$year, y = 200)
...