powered by
GetToken(user.name, user.pwd, api=c("iplant", "cipres", "tnrs"), print.curl=FALSE) RenewToken(user.name, user.pwd, token, api=c("iplant", "cipres", "tnrs"), print.curl=FALSE)
#token<-GetToken("User", "SecretPassword", api="iplant") #RenewToken("User", "SecretPassword", token, api="iplant")
Run the code above in your browser using DataLab