2015-10-19 4 views
0

Я пытаюсь вывести ответ JSON с сервера. Проблема в том, что серверу нужен служебный ключ для доступа к нему, а в JSON мы не можем отправить «Заголовок» каким-либо образом, может ли кто-нибудь предложить альтернативный способ? Предложите способ сделать это с помощью REST API.Ответ JSON с сервера с R-REST API

Здесь userID - это «Параметры запроса ввода», необходимые для вызова ответа JSON. Итак, могу ли я вызвать ответ JSON с кодом, который я использую.

url <- "https://My_web service_IP_Address/services/1/experimentii?userId=1000" 
key <- "04b347f4-1743-4d7e-a8e5-7ef45186e9b4" #serviceKey For intended response 
req <- GET(url, add_headers(serviceKey = key)) 
json <- content(req, as = "text") 
fromJSON(json) 
+2

Вы можете разместить код? –

+0

Я рекомендую вам разместить запрос с помощью вспомогательной функции из пакета 'httr': https://cran.r-project.org/web/packages/httr/index.html. – jennybryan

+0

@SameerNaik Я добавил пример кода –

ответ

0

Я думаю, что вы ищете что-то, что может передать ключ к веб-сервису и получить ответ. Поправьте меня, если я ошибаюсь. Но для передачи сервисного ключа вы можете найти RCurl package

В параметрах ввода для getURLContent есть «httpheader». Я думаю, что это поможет вам передать ключ как заголовок. Общий код будет выглядеть

getURLContent(URL, httpheader = c(Accept="application/json", "serviceKey" = "your_key")) 

Вы, возможно, придется добавить и другие параметры в соответствии с вашей веб-службы

Смежные вопросы