the url theurl <- getURL("https://en.wikipedia.org/wiki/Quebec_general_election,_2014", ssl.verifyPeer=FALSE) table.1 <- htmltab(theurl, which=12)[, c(2...