options(GoogleAuth=getGoogleAuth("rauth@barratt.pro","...",service="wise"))
options(GoogleDocsConnection=getGoogleDocsConnection(getOption("GoogleAuth")))
con <- getOption("GoogleDocsConnection")
wb <- getWorkbook("unhcr")
sh <- getWorksheets(wb,con)[["types"]]
df <- getSheet(wb,"simple")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.