Вызов API Twilio из R с использованием RCurl

Question

Я пытаюсь отправить SMS через Twilio, используя R. Следующий код работает, но после отправки SMS пытается сохранить возможность подключения.

library(RCurl)
Twilio_Account_SID <- "YourKey"
Twilio_Account_TOKEN <- "YourToken"
Number_From <- "+44*********"
Number_To <- "+44*********"
the_url <- paste("https://api.twilio.com/2010-04-01/Accounts/",
                 Twilio_Account_SID,"/Messages.XML",sep="")
output <- postForm(the_url,
                   .opts = list(
                     userpwd = paste(Twilio_Account_SID,":",Twilio_Account_TOKEN,sep=""),
                     useragent = "RCurl",
                     verbose = TRUE
                   ),
                   .params = c(From = Number_From, 
                               To = Number_To, 
                               Body = "I am sending a test message" 
                   )
)

Тогда я получаю это сообщение:

< Connection: keep-alive
< 
* Connection #1 to host api.twilio.com left intact
Error: UNAUTHORIZED

Есть ли у вас идеи, чтобы решить эту проблему?