Re: [R-es] Descarga html

2018-09-21 Por tema Sergio Castro
Muchas gracias por la ayuda a todos. Voy a seguir con RSelenium que de
momento me está dando buen resultado, aunque miraré la librería rvest.

Un saludo.

El vie., 21 sept. 2018 a las 10:10, Carlos Ortega ()
escribió:

> Hola,
>
> Como todavía no se ha comentado la alternativa y es perfectamente válida,
> la referencio.
> Puedes automatizar todo este acceso a la Web, auténticándote, navegando en
> las diferentes páginas y extrayendo la información que desees desde R.
>
> Hay un par de opciones bastante estables para hacerlo con sus dos
> respectivos paquetes:
>
>
>- RSelenium: Es uno de los paquetes desarrollados por rOpenSci.org.
>Mira el ejemplo que aparece aquí
>https://cloud.r-project.org/web/packages/RSelenium/index.html
>   - Si buscas encontrarás múltiples entradas con ejemplos de cómo
>   usarlo.
>   - rvest: Es la opción desarrollada por Hadley Wickham (RStudio).
>https://cran.r-project.org/web/packages/rvest/index.html
>
> Saludos,
> Carlos Ortega
> www.qualityexcellence.es
>
>
>
> El lun., 17 sept. 2018 a las 17:47, Sergio Castro (<
> castro.rodriguez.ser...@gmail.com>) escribió:
>
>> Buenas tardes,
>>
>> Estoy intentando automatizar unas tareas en la web y ando un poco perdido.
>> Quiero descargar con un Script de R el html de varias páginas de una web.
>> Previamente me tengo que identificar (usuario y password) en la web para
>> poder acceder a las páginas que me interesan. ¿Tienen alguna idea de por
>> donde empezar a mirar? Estoy viendo RSelenium pero si se les ocurre alguna
>> forma sencilla, se lo agradecería.
>>
>> Muchas gracias de antemano.
>>
>> Un saludo.
>>
>> [[alternative HTML version deleted]]
>>
>> ___
>> R-help-es mailing list
>> R-help-es@r-project.org
>> https://stat.ethz.ch/mailman/listinfo/r-help-es
>>
>
>
> --
> Saludos,
> Carlos Ortega
> www.qualityexcellence.es
>

[[alternative HTML version deleted]]

___
R-help-es mailing list
R-help-es@r-project.org
https://stat.ethz.ch/mailman/listinfo/r-help-es


[R-es] Descarga html

2018-09-17 Por tema Sergio Castro
Buenas tardes,

Estoy intentando automatizar unas tareas en la web y ando un poco perdido.
Quiero descargar con un Script de R el html de varias páginas de una web.
Previamente me tengo que identificar (usuario y password) en la web para
poder acceder a las páginas que me interesan. ¿Tienen alguna idea de por
donde empezar a mirar? Estoy viendo RSelenium pero si se les ocurre alguna
forma sencilla, se lo agradecería.

Muchas gracias de antemano.

Un saludo.

[[alternative HTML version deleted]]

___
R-help-es mailing list
R-help-es@r-project.org
https://stat.ethz.ch/mailman/listinfo/r-help-es


[R-es] Reintentos de una query en R

2017-02-14 Por tema Sergio Castro
Buenos días,

Estoy haciendo un script que se conecta a una base de datos externa y
en la que crea diferentes tablas. Me estoy encontrando con que la
conexion es bastante mala y muchas veces me falla a mitad de script
por este motivo.
Me gustaría meter esta sentencia de crear la tabla en algún tipo de
try/catch o algo similar para que si falla, se reintente
automaticamente un número configurable de veces.
¿Alguna idea? ¿Podrían ayudarme?

Muchas gracias.

___
R-help-es mailing list
R-help-es@r-project.org
https://stat.ethz.ch/mailman/listinfo/r-help-es


[R-es] Extraccion de datos de una Web

2016-01-18 Por tema Sergio Castro
 Buenas tardes,

 Quiero extraer datos de una web en la que ser relaciona la semana con
la puntuación obtenida por un jugador. Ahora mismo llego a obtener
elnodo en el que se relacionan la semana con la puntuación obtenida,
pero no soy capaz de extraer esa informacion en una tabla de dos
columna (semana, puntuacion) teniendo en cuenta que puede que haya
semanas que no haya puntuado (en el ejemplo, la segunda semana). De
momento lo estoy obteniendo de la siguiente forma:

 url_jugador<-"http://localhost:8080/jugadores/Luis;
 txt_jugador <- getURL(url_jugador)
 doc<-htmlTreeParse(txt_jugador, useInternalNodes = TRUE)
 puntos_nodo<- xpathApply(doc, "//table[@class='points']/tr")
 puntos_nodo
[[1]]

  1
  
  
6
  


[[2]]

  2
  
  

[[3]]

  3
  
  
9
  

attr(,"class")
[1] "XMLNodeSet"

¿Veis alguna forma de sacar la información que necesito?

Muchas gracias.
Un saludo.

___
R-help-es mailing list
R-help-es@r-project.org
https://stat.ethz.ch/mailman/listinfo/r-help-es


[R-es] transformar número en R

2015-11-24 Por tema Sergio Castro
Buenas tardes,

Estoy extrayendo un dato de una web y el separador de miles es el ".",
que es el separador decimal en R. He intentado reemplazaro por el
caracter, para convertirlo en ´numérico de R, vacío pero no me deja.
Lo que he intentado es lo siguiente:

> a<-"17.691.700" # valor que obtengo de la web
> sub(".","",a)
[1] "7.691.700"
> replace(a,".",",")
.
"17.691.700"  ","
> sub("([[:punct:]])","",a)
[1] "17691.700"

Con el ultimo intento consigo eliminar el primer ".", pero no el
último. ¿Me podeis decir una forma de eliminar los "." o de convertir
un numérico en este formato a uno que entienda R?

Muchas gracias.
Un saludo.

___
R-help-es mailing list
R-help-es@r-project.org
https://stat.ethz.ch/mailman/listinfo/r-help-es


Re: [R-es] transformar número en R

2015-11-24 Por tema Sergio Castro
Muchas gracias, con esto ya funciona perfectamente.

Un saludo.

El día 24 de noviembre de 2015, 17:44, Carlos J. Gil Bellosta
<c...@datanalytics.com> escribió:
> a <- "17.691.700" # valor que obtengo de la web
> a <- as.numeric(gsub("\\.", "", a))
>
> "sub and gsub perform replacement of the first and all matches respectively."
>
> Además, ten cuidado con ".": es el comodín para cualquier caracter. Por eso
>
> a <- "17.691.700"
> sub(".", "", a)
>
> da lo que da (y no es lo que quieres).
>
> Un saludo,
>
> Carlos J. Gil Bellosta
> http://www.datanalytics.com
>
> El día 24 de noviembre de 2015, 17:33, Sergio Castro
> <castro.rodriguez.ser...@gmail.com> escribió:
>> Buenas tardes,
>>
>> Estoy extrayendo un dato de una web y el separador de miles es el ".",
>> que es el separador decimal en R. He intentado reemplazaro por el
>> caracter, para convertirlo en ´numérico de R, vacío pero no me deja.
>> Lo que he intentado es lo siguiente:
>>
>>> a<-"17.691.700" # valor que obtengo de la web
>>> sub(".","",a)
>> [1] "7.691.700"
>>> replace(a,".",",")
>> .
>> "17.691.700"  ","
>>> sub("([[:punct:]])","",a)
>> [1] "17691.700"
>>
>> Con el ultimo intento consigo eliminar el primer ".", pero no el
>> último. ¿Me podeis decir una forma de eliminar los "." o de convertir
>> un numérico en este formato a uno que entienda R?
>>
>> Muchas gracias.
>> Un saludo.
>>
>> ___
>> R-help-es mailing list
>> R-help-es@r-project.org
>> https://stat.ethz.ch/mailman/listinfo/r-help-es

___
R-help-es mailing list
R-help-es@r-project.org
https://stat.ethz.ch/mailman/listinfo/r-help-es


Re: [R-es] problemas con tryCatch

2015-05-28 Por tema Sergio Castro
Muchas gracias,

Eso me ayuda en casi todo lo que necesito, a excepción del return. Si
meto un return dentro del error, falla y sale del tryCatch, siguiendo
con la ejecución. Mi flujo es el siguiente: Tengo una función A que
llama a la función B. En la función B tengo el tryCatch. Si se produce
un error en B, que lo tengo controlado por el tryCatch, quiero
devolver un valor KO a la función A y parar la ejecución de B en ese
punto.

Un saludo.

El día 28 de mayo de 2015, 13:30, Carlos Ortega
c...@qualityexcellence.es escribió:
 Hola,

 Mira esta referencia sobre cómo usar tryCatch():

 http://www.win-vector.com/blog/2012/10/error-handling-in-r/

 Saludos,
 Carlos Ortega

 El 28 de mayo de 2015, 10:50, Sergio Castro
 castro.rodriguez.ser...@gmail.com escribió:

 Buenos días,

 Quiero hacer una función con un if, que si devuelve un error dentro
 de él se pare la ejecución de la función devolviendo un valor. El
 código que tengo, para las pruebas, es el siguiente:

 prueba-function(a){
 b-no ha hecho stop
 c-hago el stop
 if(a3){
 variable-hola
 tryCatch({
 write(entro en el tryCatch,)
 d-variable*3
 },error=function(e){
 return(c)
 stop(write(ha dado error,))
 })
 }else{
 b-a*a*a
 }
 return (b)
 }

 prueba(2)

 La salida que me devuelve R por pantalla es:

 entro en el tryCatch
 [1] no ha hecho stop

 Cuando la que yo quiero es:

 entro en el tryCatch
 ha dado error
 [1] hago el stop

 Es decir que me saque por pantalla el mensaje que tengo en el stop y
 que la salida de la función sea la variable c.

 Muchas gracias por vuestra ayuda.

 Un saludo

 ___
 R-help-es mailing list
 R-help-es@r-project.org
 https://stat.ethz.ch/mailman/listinfo/r-help-es




 --
 Saludos,
 Carlos Ortega
 www.qualityexcellence.es

___
R-help-es mailing list
R-help-es@r-project.org
https://stat.ethz.ch/mailman/listinfo/r-help-es


[R-es] Diferencias entre la version de 32 y 64 bits

2015-04-24 Por tema Sergio Castro
Buenos días,

He hecho un desarrollo en mi máquina (de 64 bits) y funciona
correctamente. Se trata de un problema de programación lineal (usando
lpSolve y lpSolveAPI). El problema viene al ejecutar un caso concreto
que en la máquina del usuario (de 32 bits) nos da que no hay solución
factible para ese problema, pero en mi máquina de 64 sí que nos
devuelve una solución. ¿Hay alguna forma (limitar decimales, por
ejemplo) de solucionar esto?
He probado con las versiones de R 3.1.3 y 3.2

Muchas gracias.
Un saludo.

___
R-help-es mailing list
R-help-es@r-project.org
https://stat.ethz.ch/mailman/listinfo/r-help-es


Re: [R-es] control de errores en una función

2015-04-15 Por tema Sergio Castro
Muchas gracias, eso es justo lo que necesito.

Un saludo.

El 15 de abril de 2015, 13:59, Emilio L. Cano emilopezc...@gmail.com
escribió:

 Hola Sergio,

 Puedes evaluar tus expresiones y controlar errores dentro de la función
 tryCatch, por ejemplo:

 b - 0

 tryCatch(
   {
 for (i in 1:length(a)){
   b - b+1
 }
   },
   error = function(e){
 ## Aquí puedes poner cualquier comprobación
 cat(Se ha producido el siguiente error: , e$message, \n\tComprueba
 que existe el objeto a\n)
 },
   finally = {
 ## Aquí puedes evaluar cualquier expresión
 cat(Se ha producido un error en el código !!\n)
   }
 )

 Un saludo,
 Emilio


 *Emilio L. Cano*

 Mobile: +34 665 676 225
 skype: emilopezcano
 twitter: @emilopezcano
 http://emilio.lcano.com


 El 15 de abril de 2015, 12:20, Sergio Castro 
 castro.rodriguez.ser...@gmail.com escribió:

 Buenos días,

 Estoy realizando un desarrollo sobre un problema de programación
 lineal. Tengo una función en la que añado al modelo todas las
 restricciones y quiero controlar que esa parte no da error (por
 longitudes de vectores, por valores inexistentes, etc). He visto que
 existe, como en otros lenguajes, un tryCatch, pero no sé bien como
 utilizarlo. Estoy realizando pruebas a pequeña escala pero no me sale
 el resultado esperado. Por ejemplo con este código:
  b-0
  for (i in 1:length(a)){
 + b-b+1
 + }

 Error: objeto 'a' no encontrado

 Lo que quiero es poder controlar si se devuelve error para mostrar un
 mensaje más explicativo.

 Muchas gracias.
 Un saludo.

 ___
 R-help-es mailing list
 R-help-es@r-project.org
 https://stat.ethz.ch/mailman/listinfo/r-help-es




[[alternative HTML version deleted]]

___
R-help-es mailing list
R-help-es@r-project.org
https://stat.ethz.ch/mailman/listinfo/r-help-es


[R-es] control de errores en una función

2015-04-15 Por tema Sergio Castro
Buenos días,

Estoy realizando un desarrollo sobre un problema de programación
lineal. Tengo una función en la que añado al modelo todas las
restricciones y quiero controlar que esa parte no da error (por
longitudes de vectores, por valores inexistentes, etc). He visto que
existe, como en otros lenguajes, un tryCatch, pero no sé bien como
utilizarlo. Estoy realizando pruebas a pequeña escala pero no me sale
el resultado esperado. Por ejemplo con este código:
 b-0
 for (i in 1:length(a)){
+ b-b+1
+ }

Error: objeto 'a' no encontrado

Lo que quiero es poder controlar si se devuelve error para mostrar un
mensaje más explicativo.

Muchas gracias.
Un saludo.

___
R-help-es mailing list
R-help-es@r-project.org
https://stat.ethz.ch/mailman/listinfo/r-help-es