if (FALSE) {
#Content from a Wikimedia project
wp_content <- page_content("en","wikipedia", page_name = "Aaron Halfaker")
#Content by ID
wp_content <- page_content("en", "wikipedia", page_id = 12)
#Content from a non-Wikimedia project
rw_content <- page_content(domain = "rationalwiki.org", page_name = "New Age")
}
Run the code above in your browser using DataLab