2013-08-28 2 views
1

싶습니다 게시물 : 이제 Rcurl 나는 Rcurl에 다음 컬 전화를 이동

library(RCurl) 
url.opts <- list(httpheader = list(Authorization ="Basic XXXXXXXX", 
       Connection = "keep-alive", 
       "Content-Type" = "application/json;charset=UTF-8")) 

getURLContent('http://myserver.org/stream', .opts=url.opts) 

내가 추가 속성을 잃었 :

curl 'http://myserver.org/stream' 
-H 'Authorization: Basic XXXXXXXX' -H 'Connection: keep-alive' --data-binary '{"limit": 20}' 
-H 'Content-Type: application/json;charset=UTF-8' 

이 내 R 시험 중 하나입니다 --data 또는 --data-binary. 이 옵션을 추가하는 방법?

덕분에 많은 마르쿠스

+1

당신이 사용할 수있는'getURLContent (..., customrequest = 'POST', postfields은 = '{ "제한": 20}') '또는 이와 유사한. – jdharrison

+1

'httr'으로 조금 더 쉬울 수도 있습니다 : POST ('http://myserver.org/stream', c (authenticate (u, p, "basic"), accept_json(), body = '{ "limit ": 20} ')' – hadley

답변

2

덕분에 많이 @hadley.

이 내 작업 솔루션은 다음과 같습니다

library(httr) 
user <- "test" 
password <- "test123" 
POST(url = 'http://myserver.org/stream', 
    config = c(authenticate(user, password, "basic"), 
       add_headers(Connection = "keep-alive"), 
       accept_json()), 
    body = "{'username':'test'}")