R解析字符串

Question

我使用 RCurls 发出了一个请求，并为我提供了我需要的令牌。请求的答案如下：

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

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

提前致谢

Answer 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"

R解析字符串

R parsing string

json

r

parsing

rcurl