library(devtools)
install_github('dirkmjk/read.survey')
download.file('http://help.surveymonkey.com/servlet/servlet.FileDownload?file=01530000002hfBp', 'test.xlsx', method = 'curl') # Surveymonkey example export file
data <- read.surveymonkey('test.xlsx', convert = TRUE)