R语言：使用折线图分析学生身高与年龄段的关系

使用R语言绘制折线图分析学生身高与年龄段关系

假设我们有一个数据框df，其中包含100个学生的年龄和身高信息。我们可以使用cut函数将年龄分段，并使用aggregate函数计算不同年龄段的平均身高。

# 生成示例数据
set.seed(123)
age <- sample(18:25, 100, replace = TRUE)
height <- rnorm(100, mean = 170, sd = 5)
df <- data.frame(age, height)

# 将年龄分段，计算平均身高
df$age_group <- cut(df$age, breaks = c(18, 20, 22, 25))
agg <- aggregate(height ~ age_group, df, mean)

接下来，我们可以使用ggplot2包绘制折线图。

library(ggplot2)
ggplot(agg, aes(x = age_group, y = height)) +
  geom_line() +
  geom_point() +
  xlab('Age group') +
  ylab('Height') +
  ggtitle('Height by age group')

这将生成一个折线图，显示不同年龄段的平均身高随着年龄的变化。