我创建了如下数据集:
library(tidyverse)
##Create some fake data
set.seed(3)
data <- tibble(
year = 1991:2020,
One = rnorm(30),
Two = rnorm(30),
Three = rnorm(30),
Four = rnorm(30)
)
##Gather the variables to create a long dataset
new_data <- data %>%
gather(model, value, -year)
当我现在使用ggplot时,我想使用上面的数据集'new_data',但是只有列'year','Two'和'Four'。
我只知道这样说:
ggplot(new_data, aes(x = year, y = value, fill=model)) +
geom_bar(stat = "identity",position = "dodge")
绘制所有四列,并为我显示这些的传奇条目。 有什么办法可以说这样吗?:
ggplot(new_data, aes(x = year, y = value(Two,Four), fill=model)) +