R 添加选择城市文字标签-ggplot2

如何使用ggplot2将选定的城市添加到州中？我在这里到处找，找不到解决办法。下面是一些代码，通过zipcode在爱荷华州绘制销售机会。我如何为得梅因和苏族城市添加城市文字标签？我想我使用的是一行代码？谢谢你的帮助

#Plot
us<-map_data('county', 'iowa')

  #Plot Map
  ggplot(c,aes(longitude,latitude)) +
    geom_polygon(data=us,aes(x=long,y=lat,group=group),color='black',fill=NA,alpha=.75)+
    #geom_point(aes(size = total), color="red3", alpha=.25)+
    geom_point(aes(size = premium), color="dodgerblue3", alpha=I(.75))+
    scale_size(name="Total Remaining Premium (000s)", labels = scales::dollar, breaks = c(25000,100000,500000,1500000),range = c(2, 40))+
    theme_void()+
    theme(legend.title = element_text(face="bold",size=14))+
    theme(legend.text=element_text(size=14))

#绘图
us我看不到您的数据c的结构，因此我首先为苏族和得梅因族生成了long/lat，并添加了geom_文本元素：

假设你把你的图定义为p

  cit = data.frame(long=c(42.5,41.6),
             lat=c(-96.4,-93.6),
             label=c("sioux","des moines"))

  p + geom_text(aes(x = lat, y = long, label = label),
        data= cit,
        alpha = 1,
        color = "black",
        size = 4) # check size

或者，您可以在c中选择直接提供城市长/纬度的行
c指的是另一个数据文件吗？是的，c指的是一个数据文件，其中包含一个城市变量，
c$city
。它是否存储所需城市的长/纬度？我猜使用
注释
可以将单个文本元素添加到绘图中。是的，它确实为每个城市存储long/lat。