我郁闷的是完成
> roath <- creatOAuth(app_name="myrweibo","rweibo", forcelogin=TRUE)
Error: could not find function "creatOAuth"
> roath <- createOAuth(app_name="myrweibo","rweibo", forcelogin=TRUE)
# The port of help server was set to 80
starting httpd help server ... done
Please input the codes here
CODE: 9b1ebef06228703a5d8310436e4365c2
之后,一直卡着。。。老提示R is busy。。。