Ошибка при очистке при создании нового столбца с Rvest - PullRequest
Новая
       110

Ошибка при очистке при создании нового столбца с Rvest

0 голосов
/ 21 февраля 2020

У меня довольно простая работа, которую я пытаюсь сделать, используя Rvest и httr, но я получаю ошибку ниже. Кажется, что не нравится окончание}, и я не могу понять, почему. Я попытался запустить первые 4 страницы с пробами, как показано ниже: urls [1: 4] 

library(tidyverse) 
library(rvest) 
library(glue)
library(httr)

url <-  "https://www.pro-football-reference.com/years/{yrr}/passing.htm"

urls <- map(.x = 1970:2019,
   .f = function(x){gsub(x = url, pattern = "\\{yrr\\}", replacement = x)}) %>% 
  unlist 

map_dfr(.x = urls[1:4],
    .f = function(x) Sys.sleep(3); cat("."); {read_html(x) %>% 
        html_nodes("table") %>% 
        html_table() %>% 
        mutate(year = str_extract(string = x, pattern = "(?<=years\\/=)\\d+"))} -> df

Ошибка: 

unexpected '}' in:
"            html_table() %>% 
        mutate(week = str_extract(string = x, pattern = "(?<=years\\/=)\\d+"))}"
...