R解析字符串

【问题标题】：R parsing stringR解析字符串
【发布时间】：2015-02-20 22:46:42
【问题描述】：

我使用 RCurls 做了一个请求，并给了我我需要的令牌。请求的答案如下：

r<-POST(url,body = data)
content(r)
"{\"token\" : \"WiKuxCc2VboCLBc_MbtKrKtDkJnDSntrGjYrazbgs1FRX_BAj-p2gadILBNhk9JBti0m6o_i7DYaqf4R4i2xPh1TedYWpCrINShiFrB7xabbv8zT-8LCBTUau14HPZzv\",\"expires\" : 1425681647918,\"ssl\" : false}"

如何解析我从content(r) 获得的字符串以仅获取令牌？

提前致谢

【问题讨论】：

函数POST来自httr，而不是RCurl

标签： json r parsing rcurl

【解决方案1】：

这是 JSON 格式：

library(rjson)
json <- "{\"token\" : \"WiKuxCc2VboCLBc_MbtKrKtDkJnDSntrGjYrazbgs1FRX_BAj-p2gadILBNhk9JBti0m6o_i7DYaqf4R4i2xPh1TedYWpCrINShiFrB7xabbv8zT-8LCBTUau14HPZzv\",\"expires\" : 1425681647918,\"ssl\" : false}"
x <- fromJSON(json)
x$token
[1] "WiKuxCc2VboCLBc_MbtKrKtDkJnDSntrGjYrazbgs1FRX_BAj-p2gadILBNhk9JBti0m6o_i7DYaqf4R4i2xPh1TedYWpCrINShiFrB7xabbv8zT-8LCBTUau14HPZzv"

【讨论】：