r语言数据分析案例r语言数据分析案例 下面5个不同专业的学生统计学考试的平均分数 专业 经济 会计 营销 金融 管理 平均分数 85 82 78 91 7 (1)使用graphics包中的barplot函数,分别用连续性调色板、离散型调色板和极端值调色板绘制条形图。
时间: 2024-09-21 12:05:47 浏览: 32
在R语言中,你可以通过以下步骤来创建一个条形图,展示五个不同专业的学生统计学考试平均分数,并使用三种不同的调色板:
首先,你需要准备数据,将专业和平均分列存储在一个数据框(data frame)中。假设你的数据是这样的:
```R
# 创建数据框
students <- data.frame(
profession = c("经济", "会计", "营销", "金融", "管理"),
avg_score = c(85, 82, 78, 91, 7)
)
```
接下来,你可以使用`barplot`函数来绘制条形图。这里将分为三部分演示:
1. **连续性调色板**(如`RColorBrewer::brewer.pal(n = 5, name = "Blues")`):
```R
library(grDevices) # 包含colorspace和RColorBrewer
barplot(avg_score ~ profession, students,
col = rev(brewer.pal(n = 5, name = "Blues")), # 使用蓝绿渐变调色板
main = "学生考试平均分数 - 连续性调色板",
xlab = "专业", ylab = "平均分数")
```
2. **离散型调色板**(例如,彩虹色):
```R
barplot(avg_score ~ profession, students,
col = rainbow(5), # 雨虹色调色板
main = "学生考试平均分数 - 离散型调色板",
xlab = "专业", ylab = "平均分数")
```
3. **极端值调色板**(通常用于强调最高和最低值):
```R
barplot(avg_score ~ profession, students,
col = ifelse(avg_score == max(students$avg_score),
"red", ifelse(avg_score == min(students$avg_score), "green", "grey")),
border = "black",
main = "学生考试平均分数 - 极端值调色板",
xlab = "专业", ylab = "平均分数")
```
每个例子会生成一个条形图,显示各个专业的平均分数分布,并按照指定颜色方案区分。