如何基于county数据集绘图？求解第2题b、c部分结果

首先明确题目核心要求：

b. 绘制美国各县**家庭收入中位数（income）与贫困率（poverty）**的散点图
c. 在散点图上添加最小二乘拟合线，并描述两个变量的关系

1. 准备数据与工具 #

先加载所需包和目标数据集：

# 安装并加载openintro包（内置county数据集）
install.packages("openintro")
library(openintro)
# 加载ggplot2用于可视化
install.packages("ggplot2")
library(ggplot2)

# 导入county数据集
data(county)

2. 完成b部分：绘制散点图 #

用ggplot2生成散点图，清晰展示两个变量的分布关系：

ggplot(county, aes(x = income, y = poverty)) +
  geom_point(alpha = 0.5) +  # 设透明度避免点重叠
  labs(
    title = "家庭收入中位数 vs 贫困率",
    x = "家庭收入中位数（美元）",
    y = "贫困率（%）"
  ) +
  theme_minimal()

3. 完成c部分：添加拟合线并描述关系 #

在散点图基础上添加线性拟合线，同时总结变量关系：

ggplot(county, aes(x = income, y = poverty)) +
  geom_point(alpha = 0.5) +
  geom_smooth(method = "lm", color = "red", se = FALSE) +  # 红色拟合线，关闭置信区间
  labs(
    title = "家庭收入中位数 vs 贫困率（带拟合线）",
    x = "家庭收入中位数（美元）",
    y = "贫困率（%）"
  ) +
  theme_minimal()

变量关系描述 #

从图表可得出：

• 两者呈显著负线性相关：家庭收入中位数越高的县，贫困率普遍越低，拟合线呈明显下降趋势。
• 存在少量偏离拟合线的异常点，说明部分县的收入与贫困率关系和整体趋势有差异。

内容的提问来源于stack exchange，提问作者RRR12