Plotly
имеет эту приятную функцию, чтобы скрыть график, если вы нажмете на его название в легенде. Элементы легенды становятся серыми, и линия появляется снова, только если мы снова нажимаем на элемент легенды.
Представьте, что вы хотите развернуть блестящее приложение, в котором пользователь может просматривать временные ряды и, кроме того, он может просматривать сезонность трендов и т. д. на том же графике.
Я хочу, чтобы изначально в отображаемом объекте ggplotly отображалась только серия, когда пользователь открывает приложение. Все остальные диагностические графики, такие как тренд (в моем репрексе) и сезонность, должны быть скрыты по умолчанию. Только когда я нажимаю на пункт легенды Тренд (репрекс), должна дополнительно появиться линия тренда.
Я знаю, как это сделать в блестящих, с блестящими функциями, но я хочу иметь возможность решить это с помощью сюжетных или javascript-функций, как я упоминал выше.
репрекс-код (попробуйте скрыть строку "Тренд" по умолчанию):
library(plotly)
library(lubridate)
library(ggplot2)
set.seed(42)
data <- tibble(id = c(rep("A",24)),
value = c(cumsum(rnorm(12)), seq( 1, 7, length.out = 12)),
date = rep(c(ymd("2013-01-01")+ months(0:11)),2),
label = c(rep("Series",12),rep("Trend", 12))
)
p <- ggplot(data, mapping = aes(x= date, y= value, color = label)) +
geom_line() +
xlab("")
ggplotly(p) %>% layout(legend=list(y = -0.2,
xanchor = 'left',
yanchor = 'bottom',
orientation = 'h'))
Вы можете использовать style
с traces
, что позволит скрыть только строку Trend
. Вы можете использовать следующий код:
library(plotly)
library(lubridate)
library(ggplot2)
set.seed(42)
data <- tibble(id = c(rep("A",24)),
value = c(cumsum(rnorm(12)), seq( 1, 7, length.out = 12)),
date = rep(c(ymd("2013-01-01")+ months(0:11)),2),
label = c(rep("Series",12),rep("Trend", 12))
)
p <- ggplot(data, mapping = aes(x= date, y= value, color = label)) +
geom_line() +
xlab("")
p <- ggplotly(p) %>% layout(legend=list(y = -0.2,
xanchor = 'left',
yanchor = 'bottom',
orientation = 'h'))
style(ggplotly(p),visible = "legendonly", traces = 2)
Выход:
Как вы можете видеть на изображении, в настоящее время отображаются только серии, а тенденция скрыта.