都市の選択ラベルを追加する - ggplot2

Question

選択都市をggplot2を使用して州に追加するにはどうすればよいですか？私はここで高値と低値を検索し、解決策を見つけることができませんでした。以下は、アイオワ州の郵便番号による販売機会をプロットするコードです。デモインとスーシティの都市テキストラベルを追加するにはどうすればいいですか？私はgeom_textコード行を使用していると思いますか？ご協力いただきありがとうございます。

#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)) 

Answer 1

私はCは私が最初にスーとデモインのために長い/緯度を生成し、geom_text要素を追加してデータの構造を見ることができない。

するのは、あなたが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 

別の方法としては、直接