在 r 中的同一张图上绘制多个列表(散点图)
Plot multiple lists on the same graph in r (scatter plot)
我试图根据下面的代码绘制如下图所示的图表:
xAxisName <- c("ML", "MN")
car1 <- c(5,6)
names(car1) <- xAxisName
car2 <- c(5.5,6.2)
names(car2) <- xAxisName
car3 <- c(4.9, 5.4)
names(car3) <- xAxisName
该图在 x 轴上绘制了 2 个汽车属性,每个 属性 有 3 个汽车值。但这些是单独的列表。这个情节是如何绘制的?
将所有 'car' 对象放入 list
,将它们与 bind_rows
绑定并使用 ggplot
,然后转换为 'long' 格式并使用 ggplot
library(ggplot2)
library(dplyr)
library(tidyr)
mget(ls(pattern = '^car\d+$')) %>%
bind_rows(.id = 'car') %>%
pivot_longer(cols = -car) %>%
ggplot(aes(x = name, y = value, color = car)) +
geom_point()+
scale_y_continuous(expand = c(5, 6))
我试图根据下面的代码绘制如下图所示的图表:
xAxisName <- c("ML", "MN")
car1 <- c(5,6)
names(car1) <- xAxisName
car2 <- c(5.5,6.2)
names(car2) <- xAxisName
car3 <- c(4.9, 5.4)
names(car3) <- xAxisName
该图在 x 轴上绘制了 2 个汽车属性,每个 属性 有 3 个汽车值。但这些是单独的列表。这个情节是如何绘制的?
将所有 'car' 对象放入 list
,将它们与 bind_rows
绑定并使用 ggplot
,然后转换为 'long' 格式并使用 ggplot
library(ggplot2)
library(dplyr)
library(tidyr)
mget(ls(pattern = '^car\d+$')) %>%
bind_rows(.id = 'car') %>%
pivot_longer(cols = -car) %>%
ggplot(aes(x = name, y = value, color = car)) +
geom_point()+
scale_y_continuous(expand = c(5, 6))