我认为你需要这样的东西:
library(ggplot2)
data <- data.frame(cite= c('london','madrid','barcelona','london','madrid','barcelona'),
contaminent = c('Argon','Argon','Argon','Barium','Barium','Barium'),
Concentration= runif(6)*5)
ggplot() + geom_col(data = data,aes(x = cite,y=Concentration,fill=contaminent))
编辑:
现在假设您的数据名称为 my_data 并按如下方式组织:第一列名称 cites 与 cites 名称,然后每一列的名称是一个污染,其中包含每个 cite 的污染浓度值。那么您用于管理数据并在 ggplot 中使用的代码可能是:
library(ggplot2)
new_data <- data.frame(cites = rep(my_data$cites,ncol(my_data)-1),
contaminent_type= rep(colnames(my_data)[2:ncol(my_data)],each=nrow(my_data)),
Concentration= as.vector(my_data[,2:ncol(my_data)]))
ggplot() + geom_col(data = new_data,aes(x = cites,y=Concentration,fill=contaminent_type))