Quick example to scrape some tabular data from wikipedia

got-scraping-bit.R

library(rvest)
library(dplyr)
library(stringr)

# Game of Thrones ----
got_wiki <- read_html("https://en.wikipedia.org/wiki/List_of_Game_of_Thrones_episodes") %>%
  html_table(fill = TRUE) %>%
  magrittr::extract(c(2:9)) %>%
  bind_rows() %>%
  setNames(c(
    "episode_abs", "episode", "title", "director",
    "writer", "firstaired", "viewers"
  )) %>%
  select(-firstaired) %>%
  mutate(
    viewers = str_replace_all(viewers, "\\[\\d+\\]", ""),
    viewers = as.numeric(viewers)
  ) %>%
  select(-episode, -title) %>%
  as_tibble()