janco maneh

R Function to Read Data from Google Docs Spreadsheets

R Function to Read Data from Google Docs Spreadsheets

I used this idea posted on Stack Overflow to plug together a function for reading data from Google Docs spreadsheets into R.

google_ss <- function(gid = NA, key = NA) 
 {
 if (is.na(gid)) {stop(" Worksheetnumber (gid) is missing ")}
 if (is.na(key)) {stop(" Documentkey (key) is missing ")}
 require(RCurl)
 url <- getURL(paste("https://docs.google.com/spreadsheet/pub?key=", key,
 "&single=true&gid=", gid, "&output=csv", sep = ""),
 cainfo = system.file("CurlSSL", "cacert.pem", package = "RCurl"))
 read.csv(textConnection(url), header = T, sep = ",")
 }

## Example:
## Mind that the worksheets are numbered consecutively from 0 to n,
## irrespective of the actual worksheet-name.
## The key should be put in apostrophes.
## And, the URL works only for published spreadsheets!

(data <- google_ss(gid = 0,
 key = "0AmwAunwURQNsdDNpZzJqTU90cmpTU0sza2xLTW9fenc"))

visit link download