如何将城市名称转换为时区?

How do I convert city names to time zones?

抱歉,如果这是重复的,但我到处都找过了,似乎找不到任何解决我在 R 中的特定问题的东西。我有一个包含城市名称的列:

cities <-data.frame(c("Sydney", "Dusseldorf", "LidCombe", "Portland"))
colnames(cities)[1]<-"CityName"  

理想情况下,我想附加一个包含每个城市或时区的 lat/long 的列。我曾尝试在 R 中使用 "ggmap" 包,但我的请求超过了他们每天允许的最大请求数。我找到了将 lat/long 转换为时区的 "geonames" 包,所以如果我得到城市的 lat/long,我应该可以从那里获取它。

编辑以解决潜在的重复问题:我想在不使用 ggmap 包的情况下执行此操作,因为我有太多行并且它们每天有最大请求数.

你可以从maps包中的world.cities数据中得到至少多个主要城市。

## Changing your data to a vector
cities <- c("Sydney", "Dusseldorf", "LidCombe", "Portland")

## Load up data
library(maps)
data(world.cities)

world.cities[match(cities, world.cities$name), ]
            name country.etc     pop    lat   long capital
36817     Sydney   Australia 4444513 -33.87 151.21       0
10026 Dusseldorf     Germany  573521  51.24   6.79       0
NA          <NA>        <NA>      NA     NA     NA      NA
29625   Portland   Australia    8757 -38.34 141.59       0

注意: LidCombe 不包括在内。
警告:对于许多名称,世界城市不止一个。例如,

world.cities[grep("Portland", world.cities$name), ]
          name country.etc    pop    lat    long capital
29625 Portland   Australia   8757 -38.34  141.59       0
29626 Portland         USA 542751  45.54 -122.66       0
29627 Portland         USA  62882  43.66  -70.28       0

当然美国的两个就是缅因州的波特兰和俄勒冈州的波特兰。 match 只是给出列表中的第一个。您可能需要使用比名称更多的信息才能获得良好的结果。