geom_point()条件设置问题：折线图添加人口规模对应点遇阻

你的代码有两个关键问题导致无法实现需求：

• 筛选新西兰数据后未赋值：使用filter(gapminder, country == "New Zealand")后没有把结果保存，后续绘图依然用的全量gapminder数据，而非目标国家的数据。
• X轴映射错误：gapminder数据集中的年份字段是year，你误用了time()函数，导致X轴无法正确对应年份信息。

修正后的完整代码如下：

# 筛选新西兰的数据并赋值给变量
nz_data <- filter(gapminder, country == "New Zealand")

# 初始化ggplot，使用筛选后的数据，正确映射X轴和Y轴
p <- ggplot(data = nz_data,
            mapping = aes(x = year,
                          y = gdpPercap))

# 添加折线图，同时添加点并将点大小与人口规模绑定
p + geom_line() + geom_point(aes(size = population))

代码修正说明：

1. 将筛选后的新西兰数据存入nz_data，确保绘图仅使用目标国家的时间序列数据；
2. 将X轴映射改为year，匹配数据集中的年份字段，保证时间轴显示正确；
3. geom_point的size = population放在aes()内部，这样点的大小会根据对应年份的人口规模自动调整，完全符合作业要求。

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