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")
Saturday, February 23, 2019
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.
> 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
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
Subscribe to:
Posts (Atom)