我正在尝试滚动直到页面上可见一个元素，以便 Selenium 可以双击该元素。如果元素不可见，我会不断收到错误
Selenium message:(189, 2887) is out of bounds of viewport width (1600) and height (803)
#Navigating to Webpage for Mechanical Air Conditioner
url <- "https://www.walmart.com/ip/GE-5-000-BTU-Mechanical-Air-Conditioner-AET05LY/993795463"
rD <- rsDriver(browser = "firefox")
remDr <- rD$client
remDr$open() #Open Browser
#remDr$getStatus
remDr$navigate(url) #Navigate to WalMart Page
#Select See all Reviews
see_all_select_Elem <- remDr$findElement(using = "class name", value = "ReviewsHeader-seeAll") #Find Select All Reviews Button
see_all_select_loc <- remDr$mouseMoveToLocation (webElement = see_all_select_Elem) #Hover mouse over select All Reviews Button
see_all_select <- remDr$doubleclick(buttonId = 'LEFT') #Double Click Select All Reviews Button
如何让 Selenium 滚动直到 see_all_select_Elem 可见，以便双击功能起作用。