Я должен геокодировать несколько адресов в R, но получаю сообщение об ошибке «Тайм-аут достигнут: время соединения истекло после 10000 миллисекунд».Я нахожусь за офисным брандмауэром, поэтому попытался использовать прокси-сервер, но все равно получаю ту же ошибку.
Это работает, когда я использую источник как "dsk", но он не геокодирует большинство адресов, следовательно, хочет использовать "google "в качестве источника.
Ниже приведен фрагмент кода, который я использовал.
library(ggmap)
library(curl)
register_google(key = "Have_Entered_My_API_Key_Here")
#Used below code to use proxy...(saw it as a solution in stackoverflow only for working behind firewall..maybe I'm not doing it the correct way?)
library(httr)
set_config(use_proxy(url="10.3.100.207",port=8080))
origAddress <- read.csv("Data_for_Geocoding.csv",header = TRUE,sep = ",",stringsAsFactors = FALSE)
for(i in 1:nrow(origAddress))
{
result <- geocode(origAddress$Add_to_GeoCode[i], output = "latlona", source = "google",sensor = TRUE)
origAddress$LONGITUDE[i] <- as.numeric(result[1])
origAddress$LATITUDE[i] <- as.numeric(result[2])
# origAddress$ <- as.character(result[3])
}
Я получаю приведенную ниже ошибку при запуске этого кода. "Ошибка в curl :: curl_fetch_memory (url, handle = handle): Тайм-аут достигнут: Тайм-аут соединения через 10000 миллисекунд"
У меня есть тысячи адресов, которые мне нужно геокодировать, поэтому будеточень ценю, если кто-то может помочь здесь.