t.test(mtcars$mpg,mtcars$wt,alternative = 'two.sided',
var.equal = FALSE)
df <- mtcars[c('mpg','wt')]
sd <- c(sd(mtcars$mpg),sd(mtcars$wt))
mean <- c(mean(mtcars$mpg),mean(mtcars$wt))
df2 <- data.frame(sd,mean)
df2$group <- c('mpg',
ggplot2画带误差线、显著性标记柱形图
最新推荐文章于 2024-04-27 10:31:27 发布
![](https://img-home.csdnimg.cn/images/20240711042549.png)