Saturday, February 23, 2019

Encoding en R

En la entrada anterior obtuve un dataframe, en teoría, encodeado con UTF-8

Pero al mostrar los datos el encoding no funcionaba.

Esto me funcionó

data$apellido <- iconv(data$apellido,"ISO-8859-1")

Implementación de la secuencia de Recamán en Ruby



v=[]
actual=0

(1..200).each {|i|
    v[actual]=1;
    if ( ( (actual-i)>=0 ) && v[actual-i].nil? )
        actual -= i
    else
        actual +=i
    end
    print actual, ","
}

Friday, February 08, 2019

R con MySQL

Los pasos que sigo para obtener datos de MySQL con R son los siguientes:

En primer término hay que cargar la biblioteca RMySQL, se hace así:

> library("RMySQL")

En caso de error una de las cosas que hay que intentar es instalar la biblioteca con el usuario root.
Cerramos la session actual de R y la abrimos con el usuario root.
sudo R

Ahora instalamos la biblioteca con el comand0
>  install.packages("RMySQL")
cerramos la session e iniciamos con el usuario normal.

El segundo paso es conectarse a la base de datos, en mi caso con estos parámetros.
>  con <- dbConnect(MySQL(), user="rafael", password="chessKarKorKas", dbname="table_tennis", host="127.0.0.1")

Lo que sigue es ejecutar las consultas para obtener los datos en un RecordSet.
> rs = dbSendQuery(con, "select * from jugadores where sigla='LMI'")

Obtenemos un data.frame con los resultados del select.
> data = fetch(rs, n=-1)

cerramos el RecordSet
> dbClearResult(rs)

para cerrar la conexión  con mysql se ejecuta
> dbDisconnect(con)

vemos los datos
> data