очистка футбольных игр с помощью Rselenium

Question

Я пытаюсь очистить европейские футбольные матчи с веб-сайта табло, начиная с лиги чемпионов. Для этого я сделал вектор сезонов. Это текущий код, который я использую

seasons<- c("2010-2011", "2011-2012", "2012-2013", "2013-2014", "2014-2015", "2015-2016", "2016-2017", "2017-2018", "2018-2019")

docs_list<- list()

for(i in 1:length(seasons)){
  driver2$navigate(paste("https://www.scoreboard.com/soccer/europe/champions-league-", seasons[i], "/", sep= ""))
  Sys.sleep(5)
  webElem <- driver2$findElement("css", ".event__more--static")
  while(webElem$isElementDisplayed()[[1]]){
    webElem$clickElement()
    Sys.sleep(5)
    webElem <- driver2$findElement("css", ".event__more--static")
  }
  doc <- read_html(driver2$getPageSource()[[1]])
  Sys.sleep(5)
  docs_list[[i]]<- doc

}

Однако он продолжает ломаться после того, как он щелкнул все игры, хотя условие while должно позаботиться об этом. Я получаю сообщение об ошибке:

"Сообщение Selenium: нет такого элемента: невозможно найти элемент: {" method ":" css selector "," selector ":". Event__more - stati c " } (Информация о сеансе: chrome = 81.0.4044.129) "