如何通过 ggplot2 或 highcharter 绘制带类别的垂直李克特折线图?
how to plot a Vertical Likert Line Chart with Categories by ggplot2 or highcharter?
我想做一个垂直李克特折线图,有没有ggplot2或者highcharter绘制的?
示例图表如下:
数据示例:
value1 <- abs(rnorm(26))*2
data <- data.frame(
x=LETTERS[1:26],
value1=value1,
value2=value1+1+rnorm(26, sd=1)
)
library(tidyverse)
data %>%
pivot_longer(-x) %>%
ggplot(aes(x, value, color = name, group = name)) +
geom_line() +
geom_point() +
coord_flip()
P.S。 --- 从 2020 年 3 月的 ggplot2 3.3.0 开始,您可以跳过“coord_flip”步骤并直接按照您想要的方向描述坐标轴,但是 geom_line
步骤仍然需要微调才能显示正确:
...
ggplot(aes(value, x, color = name, group = name)) +
geom_line(orientation = "y") +
geom_point()
我想做一个垂直李克特折线图,有没有ggplot2或者highcharter绘制的?
示例图表如下:
数据示例:
value1 <- abs(rnorm(26))*2
data <- data.frame(
x=LETTERS[1:26],
value1=value1,
value2=value1+1+rnorm(26, sd=1)
)
library(tidyverse)
data %>%
pivot_longer(-x) %>%
ggplot(aes(x, value, color = name, group = name)) +
geom_line() +
geom_point() +
coord_flip()
P.S。 --- 从 2020 年 3 月的 ggplot2 3.3.0 开始,您可以跳过“coord_flip”步骤并直接按照您想要的方向描述坐标轴,但是 geom_line
步骤仍然需要微调才能显示正确:
...
ggplot(aes(value, x, color = name, group = name)) +
geom_line(orientation = "y") +
geom_point()