Nothing
## ---- include = FALSE---------------------------------------------------------
knitr::opts_chunk$set(
collapse = TRUE,
comment = "#>"
)
## ----setup, eval=FALSE--------------------------------------------------------
# # download from github
# devtools::install_github("corydonbaylor/getwiki")
# # load into R
# library(getwiki)
## ----getwiki, eval=FALSE------------------------------------------------------
# # will return a character string with the contents of the wikipedia page on France.
# get_wiki("France")
#
## ----getwiki_multiple, eval=FALSE---------------------------------------------
# # will return a character string with the contents of the wikipedia page on France.
# get_wiki(c("France", "United States"))
#
## ----getwiki_clean, eval=FALSE------------------------------------------------
# # this will keep the html tags from the API results
# get_wiki("France", clean = FALSE)
#
## ----search_wiki, eval=FALSE--------------------------------------------------
# # this will keep the html tags from the API results
# search_wiki("United States")
#
## ----search_wiki_big, eval=FALSE----------------------------------------------
# # this will keep the html tags from the API results
# us = search_wiki("United States")
#
# # this will return the full text of the wikipedia articles
# big_us = get_wiki(us$titles)
#
## ----random_wiki, eval=FALSE--------------------------------------------------
# # returns a random wikipedia article
# random_wiki()
#
## ----trend_wiki, eval=FALSE---------------------------------------------------
# # returns a random wikipedia article
# trend_wiki("France")
#
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.