如何使用 R Plotly 在后台将分组和堆栈条形图与 layout.shape 组合?
How can I combine group and stack bar chart with layout.shape in background using R Plotly?
我正在尝试创建一个可视化效果,我需要同时使用堆栈和组条形图。
我使用的数据有几千行,下面是其中的一个子集。
Month Week Cat n
_____________________________
2019-Dec 4 A 17
2019-Dec 4 B 6
2019-Dec 5 A 21
2019-Dec 5 C 10
2020-Jan 1 A 19
2020-Jan 1 B 20
2020-Jan 1 C 12
我想要的情节是这样的:
其中按月分组,按猫堆叠,区分不同的周我想在不同周的背景中添加矩形形状 (https://plotly.com/r/shapes/)。
提前致谢!
正如评论中提到的堆叠+分组条形图aren't implemented yet in plotly。这是 ggplot2
/ ggplotly
解决方法:
library(plotly)
library(ggplot2)
DF <- data.frame(
stringsAsFactors = FALSE,
Month = c("2019-Dec","2019-Dec",
"2019-Dec","2019-Dec","2020-Jan","2020-Jan","2020-Jan"),
Week = c(4L, 4L, 5L, 5L, 1L, 1L, 1L),
Cat = c("A", "B", "A", "C", "A", "B", "C"),
n = c(17L, 6L, 21L, 10L, 19L, 20L, 12L)
)
p <- ggplot(DF, aes(x = Week, y = n, fill = Cat)) + geom_bar(stat = 'identity', position = 'stack') + facet_grid( ~ Month) + theme_bw()
ggplotly(p)
我正在尝试创建一个可视化效果,我需要同时使用堆栈和组条形图。 我使用的数据有几千行,下面是其中的一个子集。
Month Week Cat n
_____________________________
2019-Dec 4 A 17
2019-Dec 4 B 6
2019-Dec 5 A 21
2019-Dec 5 C 10
2020-Jan 1 A 19
2020-Jan 1 B 20
2020-Jan 1 C 12
我想要的情节是这样的:
其中按月分组,按猫堆叠,区分不同的周我想在不同周的背景中添加矩形形状 (https://plotly.com/r/shapes/)。
提前致谢!
正如评论中提到的堆叠+分组条形图aren't implemented yet in plotly。这是 ggplot2
/ ggplotly
解决方法:
library(plotly)
library(ggplot2)
DF <- data.frame(
stringsAsFactors = FALSE,
Month = c("2019-Dec","2019-Dec",
"2019-Dec","2019-Dec","2020-Jan","2020-Jan","2020-Jan"),
Week = c(4L, 4L, 5L, 5L, 1L, 1L, 1L),
Cat = c("A", "B", "A", "C", "A", "B", "C"),
n = c(17L, 6L, 21L, 10L, 19L, 20L, 12L)
)
p <- ggplot(DF, aes(x = Week, y = n, fill = Cat)) + geom_bar(stat = 'identity', position = 'stack') + facet_grid( ~ Month) + theme_bw()
ggplotly(p)