# google file ID (the part of the sharing link between the second last / and last /) id <- "0B-wuZ2XMFIBUd09Ob0pKVkRzQTA" read.csv(sprintf("https://docs.google.com/uc?id=%s&export=download", id))