刮取状态

Question

我有一个存储在.csv文件中的美国州名单：

cities <- read.csv("cities.csv")
states <- fetch_cities$states
df_total_US <- data.frame(state = character(), lon = character(), lat = character())

州＆lt; - as.character（cities $ States）

现在我想循环遍历状态并获取它们的经度和纬度值。所以我这样做：

   for(state in states){
     df_temp <- geocode(state)
     df_add <- data.frame(state = state, lon = df_temp$lon[1], lat = df_temp$lat[1])
     df_total_US <- rbind(df_add, df_total_US)
     Sys.sleep(5) 
   }

然而，这提出了几个警告（）说：

geocode failed with status OVER_QUERY_LIMIT, location = ...

我认为我可以通过包含：\

来摆脱这个错误

sys.sleep(5)

但显然这不起作用。我应该怎样做才能刮掉列表的坐标？