我试图在for循环中使用ggplot2的geom_point在一个绘图上绘制多个不同大小的圆。但是，每次运行它时，它都会绘制所有圆，但是所有圆都绘制在最后一个圆的位置，而不是数据框给出的相应位置。下面是我正在运行的代码的示例。我想知道如何解决这个问题，或者是否有更好的方法来了解我在这里想要做的事情。

data <- data.frame("x" = c(0,500,1000,1500,2000),"y" = c(1500,2000,1000),"size" = c(3,5,1.5,4.2,2.6)
)

g <- ggplot(data = data,aes(x = x,y = y)) + xlim(0,2000) + ylim(0,2000)
for(i in 1:5) {
  g <- g + geom_point(aes(x=data$x[i],y=data$y[i]),size = data$size[i],pch = 1)
}
print(g)