Tag: RSELENIUM
Estoy tratando de extraer la siguiente tabla de este enlace: https://www.price.moc.go.th/en/home_en Utilizando rvest, lo siguiente no funciona, pero no logro descubrir qué cambiar: Leer código HTML html <- read_html(“https://www.price.moc.go.th/en/home_en”) Acceder a un selector CSS específico check <- html %>% html_nodes(“#cpi_index > td:nth-child(2)”) %>% html_text() Imagen de descripción: enlace de imagen
Estoy intentando extraer solo un valor de este sitio, pero no puedo obtenerlo. Aquí está mi código: library(RSelenium) rD <- rsDriver(browser=”chrome”,port=0999L,verbose = F,chromever = “95.0.4638.54”) remDr <- rD[[“client”]] remDr$navigate(“https://www.dailyfx.com/eur-usd”) html <- remDr$getPageSource()[[1]] library(rvest) page <- read_html(html) nodes <- html_nodes(page, css = “.mt-2.text-black”) html_text(nodes) Mi resultado es: html_text(nodes) [1] “\n\nEUR/USD\nMixed\n\n\n\n\n\n\n\n\n\nNet Long\n\n\n\nNet . . . Read more
Estoy utilizando RSelenium para hacer web scraping en el sitio web https://unicancer.sigaps.fr/. Quiero revisar los puntos sigaps de mi equipo (para aquellos que no lo sepan, cuando publicas un artículo en una revista científica, obtienes puntos y cuanto más puntos tengas, más reconocimiento recibirás). Quiero automatizar la recopilación de esos . . . Read more
He estado ejecutando un script con éxito diariamente por un tiempo, pero ahora parece estar generando un error de tiempo de espera. chromever = “96.0.4664.45” rD <- rsDriver(browser=”chrome”, port=free_port(), chromever = chromever) remDr <- rD[[“client”]] remDr$navigate(“https://www.theweathernetwork.com/ca/14-day-weather-trend/british-columbia/coquitlam”) pageinfo <- read_html(remDr$getPageSource()[[1]]) precipitation <- pageinfo %>% html_nodes(“.wxCell .wxObs”) %>% html_text() En la línea . . . Read more
Estoy intentando realizar algunas pruebas de Selenium contra una aplicación Shiny que tiene algunas notificaciones. Tengo una función siguiente que llamaría para cerrar todas las notificaciones que están allí, y la referencia al elemento se recupera justo antes de llamar al clic. close_notifications <- function() { buttons <- remDr$findElements(using = . . . Read more