Barplot与组和子组

Question

我需要使用以下数据制作包含组和变量的箱线图：

df<-as.data.frame(cbind(c(1,2,3),
                        c(0.4,-0.11,-0.07),
                        c(0.31,0.07,0),
                        c(0.45,-0.23,0.02)))
names(df)<-c('cat','var1','var2','var3')

我需要在横坐标上制作一个横幅为cat1的条形图，并在纵坐标上制作每个变量的测量值。

例如，关于cat=1，我需要横坐标中cat1的数量，其中3个条形图表示（var1，.. var3）的值。

Answer 1

library(tidyverse)
df <- df %>% 
     gather(var, val, -cat)

ggplot(df, aes(cat, val, fill=var)) + 
    geom_col(position="dodge")