各位老师好，我有个R语言的问题，请老师执教~
data有两个字段，一个字段是pro，是有10个省份，一个字段是gmv，一个字段是profit，这两个是数值型，我想画这10个省的gmv和profit的散点图，有没有办法用循环画出是个图呢？感谢老师~下面是我的代码，画出来不对


pron<- c("福建","江西","浙江","山东", "湖北","湖南","山西","云南","河南","重庆")
for (i in pron){
  png(file="销售额散点图i.png", bg="transparent")
  ggplot(data[data$pro==i,], aes(x=gmv, y=profit)) +
    geom_point()+
    labs(x="销售额",y="利润额")
  dev.off()
}