Я пытаюсь запросить данные из API и получить их в виде таблицы.
Вот мой код:
source("keys.R")
base_uri_google <- "https://www.googleapis.com/civicinfo/v2/representatives"
params <- list(address = "Seattle,WA", key = google.key)
google_response <- GET(base_uri_google, query = params)
request_body <- content(google_response)
offices_body <- request_body$offices
officials_body <- request_body$officials
offices_table <- offices_body %>% select(name)
officials_table <- officials_body %>% select(name)
Всякий раз, когда я запускаю последние две строки кода, он показывает мне нужные данные, но затем появляется следующее:
Selection:
Enter an item from the menu, or 0 to exit.
А потом, когда я пытаюсь получить доступ к этим двум переменным, они не найдены.
Как я могу это исправить?