I tried the code in here Scrolling page in RSelenium but it's not working as the web site that I'm working on will load more content as you scroll down. For example
webElem <- remDr$findElement("css", "body")
webElem$sendKeysToElement(list(key = "end"))
webElem$screenshot(display = TRUE)
This is the screenshot of part of the website.
Then I repeat the process again.
webElem$sendKeysToElement(list(key = "end"))
webElem$screenshot(display = TRUE)
The result is still the same.