如何使用R Base绘制数据子集散点图并自定义坐标轴刻度

多条件筛选报错修复 #

subset()函数的第二个参数为所有筛选逻辑的组合，多个条件需要用&连接，你之前误将第二个筛选条件放在了用于指定保留列的第三个参数位置，导致报错。按需求筛选女性、指标为预期寿命的写法如下：

sub_lf <- subset(LF, Sex == "Female" & Measure.Variables == "Life Expectancy")

强制显示自定义坐标轴刻度修复 #

Base R默认plot()会根据数据范围自动生成坐标轴刻度，要强制显示你指定的刻度，需要先关闭默认坐标轴生成逻辑，手动指定轴范围后再调用axis()添加自定义刻度，完整绘图代码如下：

# 筛选符合条件的子集
sub_lf <- subset(LF, Sex == "Female" & Measure.Variables == "Life Expectancy")

# 基础绘图，关闭默认坐标轴、强制指定轴范围
with(sub_lf, 
     plot(Year, Average.Life.Expectancy, 
          col = "red", pch = 17,
          main = "女性预期寿命", 
          ylab = "预期寿命",
          xlab = "年份",
          xlim = c(1900, 2000),
          ylim = c(30, 80),
          axes = FALSE)
)

# 手动添加自定义x轴刻度
axis(side = 1, breaks = c(1900,1920,1940,1960,1980,2000))
# 手动添加自定义y轴刻度
axis(side = 2, breaks = c(30,40,50,60,70,80))

# 补充图形边框
box()

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