Skip to content

Instantly share code, notes, and snippets.

@tukachev
Last active August 29, 2015 14:02
Show Gist options
  • Save tukachev/8474028dda6ec678d74b to your computer and use it in GitHub Desktop.
Save tukachev/8474028dda6ec678d74b to your computer and use it in GitHub Desktop.
read.gspreadsheet <- function(key) {
require(RCurl)
myCsv <- getURL(paste("https://docs.google.com/spreadsheet/pub?hl=en_US&hl=en_US&key=",
key, "&single=true&gid=0&output=csv", sep = ""),
.encoding = "UTF8")
read.table(textConnection(myCsv), header = T, sep = ",", stringsAsFactors = FALSE)
}
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment