A continuación se muestra el código utilizado para extraer datos sobre películas de IMDB. Estoy luchando para organizarlo en una tabla
Código original:
biblioteca (netstat)
biblioteca (RSelenium)
biblioteca (tidyverse)
obj<-rsDriver(browser="chrome",chromever="101.0.4951.15",verbose=F,port=free_port())
remDr<-obj$cliente
remDr$navegar(‘https://www.imdb.com/search/title/?year=2022&title_type=feature&’)
Título<-remDr$findElements(using='css','.lister-item-header a')
lapply(Título,función(x) { x$getElementText()%>% unlist() })
o/p:
[1]
1 «Doctor Extraño en el Multiverso de la Locura»
[[2]]1 «Último año»
.
.
.
Mis intentos de organizar los datos en forma tabular-
-
películas=datos.fotograma(Título,cadenasAsFactors=FALSO)
ver (películas)
Error en as.data.frame.default(x[[i]]opcional = VERDADERO): no se puede forzar la clase ‘estructura («webElement», paquete = «RSelenium»)’ a un data.frame
-
películas=data.frame(x,stringsAsFactors=FALSO)
ver (películas)
Error en data.frame (X, stringsAsFactors = FALSE): objeto ‘X’ no encontrado
-
Parte del código original modificado-
lapply(Título,función(x) {
t<-lista(x$getElementText()%>% deslistar())
})l=datos.frame(«película»=t,stringsAsFactors = FALSO)
ver (l)
Error en as.data.frame.default(x[[i]]opcional = VERDADERO): no se puede obligar a la clase ‘»función»‘ a un data.frame
Salida deseada-