Re: [R-es] Salida/Puesta Sol

[Fernando Macedo]

Talvez este paquete ayude:

https://cran.r-project.org/web/packages/suncalc/suncalc.pdf

El jue., 18 oct. 2018 a las 13:07, Milagros Camacho (<
mila.camachobell...@gmail.com>) escribió:

> Buenas tardes,
>
>
>
>
>
> Quería saber si, por favor,  podías ayudarme. ¿Existe algún paquete en R
> que
> calcule la hora de salida y puesta de sol dando como entrada la latitud y
> longitud de una posición y el día en el que se produzca dicha salida y
> puesta?
>
>
>
>
>
>
>
> Muchas gracias a todos.
>
>
>
> Un saludo,
>
>
>
> Milagros Camacho Bellido.
>
>
> [[alternative HTML version deleted]]
>
> ___
> R-help-es mailing list
> R-help-es@r-project.org
> https://stat.ethz.ch/mailman/listinfo/r-help-es
>


-- 

DMTV Fernando Macedo
Asistente del área Mejoramiento Genético
Facultad de Veterinaria - UdelarR - Uruguay
Tel: 26284291
Cel.: 098596947ferm...@gmail.com

[[alternative HTML version deleted]]

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

Re: [R-es] Importando mal los datos

[Fernando Macedo]

Muy útil la información, ayer mismo estuve intentando usar fread para 
leer archivos de algunos millones de filas y números como 20171010108 
(ejemplo) me los guardaba como exponenciales raros. Leí algo sobre bit64 
pero no tuve tiempo de ahondar.

Muchas gracias!

Saludos

Fernando Macedo

El 06/10/17 a las 10:55, Jesús Para Fernández escribió:

> Es ese segundo paso el que no se como hacer. Es decir, como detecto una 
> anomalia en caracter factor de una columna?
>
> Gracias Carlos
> 
> De: Carlos Ortega <c...@qualityexcellence.es>
> Enviado: viernes, 6 de octubre de 2017 15:27
> Para: Jes�s Para Fern�ndez
> Cc: r-help-es@r-project.org
> Asunto: Re: [R-es] Importando mal los datos
>
> Puedes forzar que esa columna sea de un tipo determinado... con el par�metro 
> "colClasses" de "fread()"...
>
> O dejar que te importe todo "data.table", detectar la anomal�a, corregirla y 
> forzar el tipo de la columna a tipo num�rico...
>
> Saludos,
> Carlos Ortega
> www.qualityexcellence.es<http://www.qualityexcellence.es>
> P.S: Acu�rdate que en este foro est�n prohibidas las palabrotas... :-))...
>
>
> El 6 de octubre de 2017, 15:07, Jes�s Para Fern�ndez 
> <j.para.fernan...@hotmail.com<mailto:j.para.fernan...@hotmail.com>> escribi�:
> Entendido... El otro dia lei un art�culo sobre el efecto 2031 que versaba 
> justo sobre eso
>
> Una duda mas. En la columna ID hay alguna fila que esta mal metida y tiene un 
> caracter o algo que esta hacinedo que toda esa columna me la importe como un 
> factor y no como un numero. �Como detecto esas filas que me est�n jo...?
>
> Gracias Carlos!!!
> 
> De: Carlos Ortega 
> <c...@qualityexcellence.es<mailto:c...@qualityexcellence.es>>
> Enviado: viernes, 6 de octubre de 2017 15:01
>
> Para: Jes�s Para Fern�ndez
> Cc: r-help-es@r-project.org<mailto:r-help-es@r-project.org>
> Asunto: Re: [R-es] Importando mal los datos
>
> Porque tienes n�meros menores que 10^-31...
>
> El 6 de octubre de 2017, 14:54, Jes�s Para Fern�ndez 
> <j.para.fernan...@hotmail.com<mailto:j.para.fernan...@hotmail.com>> escribi�:
> Gracias Carlos,
>
> Me lo ha solucionado, pero..
> �Por que es necesario instlara ese paquete?
>
> Un saludo
> Jes�s
>
> 
> De: Carlos Ortega 
> <c...@qualityexcellence.es<mailto:c...@qualityexcellence.es>>
> Enviado: viernes, 6 de octubre de 2017 14:51
> Para: Jes�s Para Fern�ndez
> Cc: r-help-es@r-project.org<mailto:r-help-es@r-project.org>
> Asunto: Re: [R-es] Importando mal los datos
>
> Instala el paquete "bit64"
>
> Saludos,
> Carlos Ortega
> www.qualityexcellence.es<http://www.qualityexcellence.es>
>
> El 6 de octubre de 2017, 14:43, Jes�s Para Fern�ndez 
> <j.para.fernan...@hotmail.com<mailto:j.para.fernan...@hotmail.com>> escribi�:
> Buenas chicos,
>
> Estoy intentando importar el csv que adjunto y que tiene la siguietne forma:
>
> "a";"b"
> 11092740;0
> 8978056137;0
>
>
> Usando la funcion fread. Necesito usar la funci�n fread por velocidad (lo que 
> envio es un ejemplo simplificado pero que replica el error). El problema es 
> que al importar los datos, usando:
>
> datos<-fread(datos.csv,sep=";")
>
> el campo a no lo importa correctamente, importandome lo siguiente:
>
> a b
> 1: 5.480542e-317 0
> 2: 4.435749e-314 0
>
> �Como puedo hacer para que me lo importe bien?
>
> Gracias
> Jes�s
>
>
>
> ___
> R-help-es mailing list
> R-help-es@r-project.org<mailto:R-help-es@r-project.org>
> https://stat.ethz.ch/mailman/listinfo/r-help-es
>
>
>
> --
> Saludos,
> Carlos Ortega
> www.qualityexcellence.es<http://www.qualityexcellence.es>
>
>
>
> --
> Saludos,
> Carlos Ortega
> www.qualityexcellence.es<http://www.qualityexcellence.es>
>
>
>
> --
> Saludos,
> Carlos Ortega
> www.qualityexcellence.es<http://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


[[alternative HTML version deleted]]

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

Re: [R-es] Problema en lectura de datos. Memoria insuficiente

[Fernando Macedo]

Buenas, no se como te llevas con data.table pero usando la función fread 
del mismo obtuve estos resultados:


x=fread("ESS1-7e01.csv")
Read 331871 rows and 1020 (of 1020) columns from 0.443 GB file in 00:00:13

Estoy en un i5 con 8 GB de memoria y Ubuntu (creo que el 16.10 no 
recuerdo bien).


Saludos.


Fernando Macedo

El 27/06/17 a las 17:52, Antonio Rodriguez Andres escribió:


Si he intentado con el paquete haven pero no me lee todos los datos, se me
corta el archivo, después de un tiempo de procesamiento. Te adjunto el
fichero que quiero leer, que es del ESS, es verdad que es muy pesado, y
luego puedo seleccionar un subconjunto de ello

​
  ESS1-7e01.rar
<https://drive.google.com/file/d/0BzjI-OU4De0rdWtubWRocTVnNnc/view?usp=drive_web>
​

2017-06-27 12:37 GMT-05:00 Freddy Omar López Quintero <
freddy.lopez.quint...@gmail.com>:


2017-06-27 13:12 GMT-04:00 Antonio Rodriguez Andres <
antoniorodriguezandre...@gmail.com>:


Que archivo has intentado leer el del VWS o el de la link que te envié?


​Ambos. El del enlace que me enviaste es bastante más pequeño (me tendrías
que decir qué variables seleccionar para que sean exactamente iguales -o
enviárnoslo en un enlace drive o dropbox o algo así-). ​

¡
​Salud!​


--
«Pídeles sus títulos a los que te persiguen, pregúntales
cuándo nacieron, diles que te demuestren su existencia.»

Rafael Cadenas






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

Re: [R-es] Incluir versión

[Fernando Macedo]

En general cuando quiero mantener diferentes versiones de datos, lo que 
hago es agregarle la fecha al nombre (y si es más de uno por día la hora 
también) simplemente con paste() para generar el nombre.


Como dijeron, la otra posibilidad que permite mantener versiones de 
todo, programas y datos, es git. Con RStudio puedes integrar git, lo he 
probado hace un par de días.


https://support.rstudio.com/hc/en-us/articles/200532077-Version-Control-with-Git-and-SVN

Saludos!

Fernando Macedo

El 18/06/17 a las 05:46, José Trujillo Carmona escribió:

Supongo que si estás usando control de versiones automático, estás 
utilizando git o algo similar. Hasta donde llega mi conocimiento del 
tema git es la herramienta opensource (como R) para control automático 
de versiones de ficheros.


Y puesto que la versión actual está disponible en el servidor git que 
estés utilizando apostaría que existe alguna función de R que recupere 
esa versión.


No utilizo git, pero una rápida búsqueda me da que efectivamente hay 
muchos recursos de git incorporados a R:


http://finzi.psych.upenn.edu/cgi-bin/namazu.cgi?query=git=100=normal=score=functions=views 



Espero que ahí puedas encontrar lo que buscas.

Saludos.


El 18/06/17 a las 08:51, Carlos Ortega escribió:

Hola,

No, eso no se puede hacer con "write.csv".

El control de versiones de tus ficheros, o de tu código R lo tienes que
gestionar de otra forma.
Puedes cambiar el nombre del fichero (pero es algo que haces tú) o 
utilizar

un repositorio de gestión de código que te lleve los cambios.

Saludos,
Carlos Ortega
www.qualityexcellence.es

El 18 de junio de 2017, 8:07, Manuel Máquez <manuelm...@gmail.com> 
escribió:



Estimado Freddy:
Gracias por tu pronta respuesta; se trata de poner la versión de la 
tabla,

y de esa manera distinguir el número de edición.
Nuevamente muchas gracias.
*MANOLO MÁRQUEZ P.*

 [[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-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] Alternativa a RStudio

[Fernando Macedo]

Buenas Fernando, podrías recomendar alguna lectura/tutorial/web para 
alguien que siempre escucho hablar de las bondades del emacs pero nunca 
lo usó?

Como para iniciantes.

Gracias, saludos!

Fernando Macedo

El 21/03/17 a las 21:31, Fernando Arce via R-help-es escribió:

Buenos dias, que tal?
yo utilizo emacs ess (emacs speaking statistics). Para mi es de lejos la mejor herramienta para 
interactuar con R. No es lo mas sencillo de aprender, por la naturaleza de emacs, pero es lo mas 
completo. ESS da soporte a R, S-Plus, JAGS, Julia y algun otro scripting software, pero emacs 
basicamente da soporte a todo. Por ejemplo, los tres "clasicos" que mas se utilizan en mi 
entorno, R, matlab y python, pueden ejecutarse desde emacs, lo cual es una ventaja tener un mismo 
entorno de trabajo y no tres diferentes, sobre todo si se utiliza mayoritariamente 1 como es mi 
caso.Sin embargo, no es tan utilizado por la curva de aprendizaje (uno de los nombres chistosos no 
oficiales de EMACS es "Escape Meta Alter Control Shift", en una mañana de trabajo no se 
cuantas veces podré presional las teclas Control, Alter o Shift, pero varios cientos (o miles) 
minimo).
No es algo que recomiende a todo el mundo, pero es una alternativa que a mi me 
satisface, no asi RStudio, que desinstalé del todo, y lo paso realmente mal 
cuando a veces interactuo con codigo en ordenadores de compañeros que tienen 
RStudio instalado. Me pasa como con ggplot2 (o con el tidyverse), aprendi a 
utilizar R-base para hacer graficos (bueno, sigo aprendiendo...) así que ahí me 
quedé. Llámame carroza o viejo, pero no me quites emacs :-D
De todos modos tu llevas ya tiempo usando R asi que podrias ser un potencial 
usuario de emacs, pero solo lo recomiendo a gente que pase la mayor parte de su 
jornada delante de R o escribiendo R.
Las demas alternativas tampoco las conozco demasiado como para opinar, probe 
bastantes (tinn-r, rackward etc...) y la unica que me gustó fue notepad++ con 
el plug-in  NtppToR.
Tinn-R recuerdo que era bastante "trendy" antes del advenimiento de R-Studio. 
Alguien lo usa?
Saludos
Fer

 El Miércoles 22 de marzo de 2017 10:19, "javier.ruben.marcu...@gmail.com" 
<javier.ruben.marcu...@gmail.com> escribió:
  


  Estimado Fernando

Si, cerré desde el administrador del sistema operativo, reinicié, reinstalé.

Javier Rubén Marcuzzi

De: Fernando Macedo
Enviado: martes, 21 de marzo de 2017 20:16
Para: Marcuzzi, Javier
CC: R-help-es
Asunto: RE: [R-es] Alternativa a RStudio

Probaste matando los procesos de R y RStudio directamente?

El 21 mar. 2017 20:14, <javier.ruben.marcu...@gmail.com> escribió:
Estimado Fernando Macedo
  
Encontré algo que dice sobre la indexación, como que iría creando un índice en algún lado para encontrar partes del código utilizado en autocompletar, o algo por el estilo.
  
Estoy cambiando desde un archivo R notebook a R Markdown, sospecho que ese archivo hacía problemas, pero no estoy seguro, hace más de una hora que no puedo trabajar porque RStudio decide que se yo que.
  
O se me ocurre una posibilidad, es que al cerrar guarda algo en memoria y continúa un proceso anterior (estaba con uno que demora algunas horas, pero la sesión se cerro, y no escribe nada informando algo como “continuando”).
  
Javier Rubén Marcuzzi
  
De: Fernando Macedo

Enviado: martes, 21 de marzo de 2017 19:59
Para: Marcuzzi, Javier
CC: R-help-es
Asunto: Re: [R-es] Alternativa a RStudio
  
Buscaste en Internet por posibles problemas? Entiendo que lo usas en Windows. En Linux no he tenido problemas de ese tipo.
  
El 21 mar. 2017 19:48, <javier.ruben.marcu...@gmail.com> escribió:

Estimados

Alguno utiliza una alternativa a RStudio, últimamente no me gusta como 
funciona, por ejemplo, al cargar una archivo (abrirlo) se coloca como a 
ejecutar algo, la consola no marca nada, pero pasa el tiempo y el administrador 
de tareas de Windows 10 informa como va aumentando los megas de ram que 
consume, y aparecen mensajes de JavaScript en algunas oportunidades (lo instale 
otra vez a ver que pasa, pero el consumo de memoria es “malo y no permite 
ejecutar nada”)


Javier Rubén Marcuzzi


 [[alternative HTML version deleted]]

___
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


	[[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-help-es mailing list
R-help-es@r-project.org
https://stat.ethz.ch/mailman/listinfo/r-help-es

Re: [R-es] Alternativa a RStudio

[Fernando Macedo]

Buscaste en Internet por posibles problemas? Entiendo que lo usas en
Windows. En Linux no he tenido problemas de ese tipo.

El 21 mar. 2017 19:48,  escribió:

> Estimados
>
> Alguno utiliza una alternativa a RStudio, últimamente no me gusta como
> funciona, por ejemplo, al cargar una archivo (abrirlo) se coloca como a
> ejecutar algo, la consola no marca nada, pero pasa el tiempo y el
> administrador de tareas de Windows 10 informa como va aumentando los megas
> de ram que consume, y aparecen mensajes de JavaScript en algunas
> oportunidades (lo instale otra vez a ver que pasa, pero el consumo de
> memoria es “malo y no permite ejecutar nada”)
>
>
> Javier Rubén Marcuzzi
>
>
> [[alternative HTML version deleted]]
>
> ___
> 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

Re: [R-es] Asignación de objetos

[Fernando Macedo]

Creo que este link te puede servir:

http://stackoverflow.com/questions/1741820/assignment-operators-in-r-and

Fernando Macedo

El 09/03/17 a las 05:57, Álvaro Díez Ansotegui escribió:


Gracias José Antonio,

Entiendo por lo tanto que se puede usar indistintamente y aconsejan utilizar 
“<-“ para no llevar a un posible error. Gracias. Saludos!!

Álvaro D.



El 9 mar 2017, a las 9:49, José Antonio Palazón Ferrando <pala...@um.es> 
escribió:

Hola:

Puedes considerar que:

objeto <- expresión
objeto =  expresión

1. no es una igualdad, en realidad asignas el resultado de la expresión al 
objeto.

2. dado que existe los operadores '==',  '!='  y usamos '=' para
definir los valores de los argumentos en las funciones, pare bueno
evitar otro uso para un símbolo frecuente y que podría llevar a algún error:

función( objeto, argumento = expresión )
función( objeto1, objeto2 = expresión )

¿No sé si te parece suficiente con esto?

Seguimos


El 09/03/17 a las 09:25, Álvaro Díez Ansotegui escribió:

Buenas!

Estoy introduciéndome a R desde el enfoque de las CC Sociales. Estando trabajando los 
manuales introductores (vectores, matrices, importación y exportación de bbdd, 
tratamiento de variables, etc..) me ha quedado una duda que los manuales no 
profundizan en resolver. Pocos textos no distinguen entre la asignación, tratan el “ 
= “ de la misma forma que “ <- “. Sin embargo, la mayoría aconseja utilizar en la 
asignación “<-“, pero no profundizan en el por qué.

¿Podría alguien explicar (sin restaros mucho tiempo) el porqué?

Saludos

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

--


José Antonio Palazón Ferrando
Profesor Titular. Departamento de Ecología e Hidrología.
Facultad de Biología. Universidad de Murcia.
Campus Universitario de Espinardo
30100 MURCIA-SPAIN
Telf: +34 868 88 49 80
Fax : +34 868 88 39 63
Email: pala...@um.es

___
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


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

Re: [R-es] Sobre gráficos

[Fernando Macedo]

Un link que uso bastante para arrancar gráficos cuando no recuerdo bien 
los comandos o los argumentos es este http://www.cookbook-r.com/
No esperes encontrar nada espectacularmente para avanzados pero para 
arrancar esta bien y luego google para cosas específicas, en general en 
stack overflow se encuentran muchas de las dudas que puedan surgir.


Espero sea de ayuda.

Saludos!

Fernando Macedo


El 20/02/17 a las 12:17, Freddy Omar López Quintero escribió:

2017-02-20 11:10 GMT-03:00 hibiki <npola...@uij.edu.cu>:


desgraciadamente no me abre, da un error, es que aki hay muchas
restricciones absurdas que impiden el acceso incluso a sitios inofensivos
pero bueno eso no viene al caso, ya tengo el link y en cuanto encuentre la
via lo reviso


​

Los temas que no vienen al caso también son importantes. Échale un vistazo
al navegador tor

https://www.torproject.org/projects/torbrowser.html.en


​¡Salud!​



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

Re: [R-es] fechas

[Fernando Macedo]

Fijate si no puedes hacer lo siguiente en una planilla electrónica: en 
columnas aparte usa las funciones año() mes() y día() (libreoffice, en 
excel deben ser sin tilde, no deberían ser muy diferentes) si te toma 
los datos correctamente luego armas la fecha con fecha(y,m,d) o 
semejante.  Yo he logrado obtener fechas desde formato de texto de esa 
forma, de repente te funciona.
Las fechas son problemáticas en todos los lenguajes y planillas, todos 
tienen orígenes diferentes y no siempre se reconocen los formatos.


Suerte.

Fernando Macedo

El 17/02/17 a las 16:39, eric escribió:

hola javier, en R imagino que se podra hacer, pero en el pasado el 
mismo problema lo resolvi en una planilla electronica, creando una 
nueva columna con el formato correcto de fecha a partir de la columna 
"incorrecta".


Lo que haces es tomar los datos desde la columna incorrecta usando las 
funciones de texto =right(celda,numero de caracteres) o =left(celda, 
numero de caracteres) ... por ejemplo, para tomar el año escribes 
=right(A2,2) y asi ... luego reconstruyes en un nueva columna la fecha 
correcta usando esas partes que has tomado. Eso.


Saludos,

Eric.








On 02/17/2017 04:16 PM, Javier Valdes Cantallopts (DGA) wrote:

Hola a todos.

El otro día, al rescatar unos datos de una estación meteorológica, me
percate que la fecha de estos traía un error bien raro, la fecha
correcta debía ser *27/4/2014*.Sin embargo, el abrir la planilla, los
valores de fechas se invirtieron a *“4/27/2014”*

Yo necesito los valores en formato *y-m-d,* por ende intenté hacerlo en
Excel, sin embargo me encontré con la sorpresa que esa *_“inversión de
formato” es un error que Excel no reconoce._*

Me fui a *R,* e intenté usando.. STRPTIME-…. LUBRIDATE..etc.

Sin embargo, no obtuve resultados ya que en realidad el dato de la fecha
en un *“error y no una fecha”.*

La pregunta es la siguiente…existe alguna forma de desagregar la fecha
quizás como carácter o factor, para después darle formato con
LUBRIDATE.. por ejemplo?.

Adjunto archivo.

Saludos.




CONFIDENCIALIDAD: La información contenida en este mensaje y/o en los
archivos adjuntos es de carácter confidencial o privilegiada y está
destinada al uso exclusivo del emisor y/o de la persona o entidad a
quien va dirigida. Si usted no es el destinatario, cualquier
almacenamiento, divulgación, distribución o copia de esta información
está estrictamente prohibido y sancionado por la ley. Si recibió este
mensaje por error, por favor infórmenos inmediatamente respondiendo este
mismo mensaje y borre todos los archivos adjuntos. Gracias.

CONFIDENTIAL NOTE: The information transmitted in this message and/or
attachments is confidential and/or privileged and is intented only for
use of the person or entity to whom it is addressed. If you are not the
intended recipient, any retention, dissemination, distribution or copy
of this information is strictly prohibited and sanctioned by law. If you
received this message in error, please reply us this same message and
delete this message and all attachments. Thank you.


___
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] Saltar filas no numericas al importar csv

[Fernando Macedo]

Si:
Las filas no numéricas tienen algún patrón
Estas en un ambiente linux (aunque actualmente también se puede hacer en 
windows)

Y pensando fuera de R o usando system

Puedes usar sed antes de levantar los datos:

sed -i '/patrón/d' archivo.csv

Saludos.

Fernando Macedo

El 14/09/16 a las 13:37, javier.ruben.marcu...@gmail.com escribió:

Estimado Jesús Para Fernández

Entonces entiendo que el problema no es justo el saltar filas no numéricas, 
posiblemente en el siguiente ejemplo se explique el problema.

Los datos son algo como columnas y cada cierta cantidad  un encabezado como

Nombre  Árbol   identificación  altura  color
Pino navidad
Pino1   3   verde
Pino2   2   verde claro
….  …   …   …   …
Pino jardín 
Pino699 6   verde

¿Usted tiene los datos en un archivo de texto aproximado al ejemplo?

Javier Rubén Marcuzzi

De: Jesús Para Fernández
[[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-help-es mailing list
R-help-es@r-project.org
https://stat.ethz.ch/mailman/listinfo/r-help-es

[R-es] Opinion/discusion segundo lenguaje

[Fernando Macedo]

Buenas a todos, ando recabando opiniones al respecto de introducirme en 
un nuevo lenguaje (más allá del "hola mundo" que lo debo haber hecho 
cientos de veces).


Particularmente no creo ser un gran programador en R pero me revuelvo 
con el google y la lista de compañeros logro sacar mis cosas adelante y 
he aprendido un montón en los últimos años. Por otro lado dado que 
trabajo con archivos de genotipados y semejantes he aprendido cosas 
básicas de sed y awk que me resuelven problemas curriculares.


Lo cierto es que hace un tiempo se me ocurrió que tenía que aprender a 
usar (más profundamente) Python. Luego en intercambio de opiniones con 
otros compañeros ya me surgen las dudas. ¿Para que?


Entiendo que R puede ser medio lerdo en algunas cosas pero con el 
desarrollo que ha tenido y mantiene muchas de sus limitaciones se han 
ido salvando y hay paquetes para paralelizar, vectorizar, etc que lo 
hacen cada vez más ágil.


Sabiendo que en la lista hay muchos "poliglotas", ¿ustedes que opinan?, 
¿vale la pena entrar en un lenguaje nuevo o continuar profundizando en R?
Si vale la pena python, ¿en que cosas? ¿Archivos grandes? ¿Algún proceso 
en particular que es más efectivo? ¿conexión con base de datos?


Me han surgido esas dudas, y aunque no sea una consulta específica de R 
me pareció apropiada e interesante para plantearla en la lista.


Si les parece no apropiada pido mis disculpas de antemano.

Saludos!

--
Fernando Macedo

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

Re: [R-es] Pivot tables con data.table

[Fernando Macedo]

Muchas gracias, pensaba hacerlo en una sola línea pero no anda.
Me quedo con dcast así no tengo que cargar más paquetes.

Un abrazo!

Fernando Macedo

El 03/09/16 a las 14:26, Carlos J. Gil Bellosta escribió:

reshape2 + dcast

El día 3 de septiembre de 2016, 19:23, Fernando Macedo
<ferm...@gmail.com> escribió:

Buenas, estoy intentando hacer una especie de pivot tables con data.table
pero no logro que me salga.

Este código refleja un poco lo que quiero


library(data.table)
set.seed(1234)
DT <- data.table(x=rep(c(1,2,3),each=30),
  y=letters[sample(1:3,30,replace = T,)],
  v=sample(1:100,30))
out <- DT[,list(N=.N),by=list(x,y)]

Eso genera una salida como esta:

  x y  N
1: 1 a  8
2: 1 b 10
3: 1 c 12
4: 2 a  8
5: 2 b 10
6: 2 c 12
7: 3 a  8
8: 3 b 10
9: 3 c 12


Que esta bien, pero lo que me interesa a mi es sacar una tabla con la
siguiente estructura:

x  a b c
1 8 10 12
2 8 10 12
  ...

y así. Porque después quiero hacer frecuencias y me resulta más fácil para
armar columnas de frecuencias seguidas de esas y queda mejor para presentar
los datos también.

La verdad que he buscado pero no logro dar con la tecla de hacerlo en un
solo paso en data.table, o de repente no la hay.

  Desde ya agradezco su ayuda.
Saludos!

--
Fernando Macedo

___
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

[R-es] Pivot tables con data.table

[Fernando Macedo]

Buenas, estoy intentando hacer una especie de pivot tables con 
data.table pero no logro que me salga.


Este código refleja un poco lo que quiero


library(data.table)
set.seed(1234)
DT <- data.table(x=rep(c(1,2,3),each=30),
 y=letters[sample(1:3,30,replace = T,)],
 v=sample(1:100,30))
out <- DT[,list(N=.N),by=list(x,y)]

Eso genera una salida como esta:

 x y  N
1: 1 a  8
2: 1 b 10
3: 1 c 12
4: 2 a  8
5: 2 b 10
6: 2 c 12
7: 3 a  8
8: 3 b 10
9: 3 c 12


Que esta bien, pero lo que me interesa a mi es sacar una tabla con la 
siguiente estructura:


x  a b c
1 8 10 12
2 8 10 12
 ...

y así. Porque después quiero hacer frecuencias y me resulta más fácil 
para armar columnas de frecuencias seguidas de esas y queda mejor para 
presentar los datos también.


La verdad que he buscado pero no logro dar con la tecla de hacerlo en un 
solo paso en data.table, o de repente no la hay.


 Desde ya agradezco su ayuda.
Saludos!

--
Fernando Macedo

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

Re: [R-es] RV: zyka RD

[Fernando Macedo]

A lo que dice Eric, le agregaria que te aseguraras no tener otro archivo 
.csv en el directorio de trabajo, demas de los que te interesan. En todo 
caso trabaja en un directorio vacío y guarda todos los reportes allí.


Saludos

Fernando Macedo


 El 16/08/16 a las 21:30, eric escribió:

veo q tienen el mismo numero de columnas, asi es que los puedes leer 
en R con read.csv(), los puedes unir en un unico data.frame con 
rbind() y luego exportar a un archivo con write()


algo asi

filenames <- list.files(path 
="/home2/neo/Tesis/4tesis/2.objesp/experimento/expnov/4fames/", 
pattern="*.csv")


datos <- data.frame()
i <- 1
for (i in 1:length(filenames))
{
tmp <- read.csv(filenames[i], header=FALSE)
datos <- rbind.data.frame(datos,tmp)

}

write()

eso es lo que yo hago mas o menos, espero te sirva,

Saludos,

Eric.





On 08/16/2016 07:19 PM, Dr. José A. Betancourt Bethencourt wrote:

*De:*Dr. José A. Betancourt Bethencourt
[mailto:jbetanco...@iscmc.cmw.sld.cu]
*Enviado el:* martes, 16 de agosto de 2016 06:18
*Para:* 'r-help-es@r-project.org' <r-help-es@r-project.org>
*Asunto:* zyka RD

Estimados

Quisiera saber cómo combinar varios archivos csv  pero no de manera
manual, sino con un script

Saludos

José



___
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] ¿Qué hace as.numeric()?

[Fernando Macedo]

Mira este enlace que dice basicamente lo mismo que te puse:

http://www.dummies.com/programming/r/how-to-convert-a-factor-in-r/

Saludos

El 4 de agosto de 2016, 11:32, Fernando Macedo <ferm...@gmail.com> escribió:

> En general lo que yo uso en esos casos es as.numeric(as.character(X))
>
> No se los términos correctos pero los factores aunque se muestren con los
> nombres de las diferentes clases, internamente son clases separadas que se
> nombran como enteros por ejemplo del 1 al n de clases. Cuando usas
> directamente as.nuemric sobre un factor, este toma los numeros de las
> clases y no el valor de clase.
>
> Fijate en el código que te mando a continuación y lo verás mejor:
>
>
> x=as.factor(letters[8:18])
> levels(x)
> labels(x)
>
> as.numeric(x)
> as.character(x)
>
>
> x=as.factor(8:18)
> levels(x)
> labels(x)
>
> as.numeric(x)
> as.character(x)
> as.numeric(as.character(x))
>
>
> Usé labels en el código aunque no se si son exatamente las labels de los
> factores, pero usandola ejemplifica justamente lo que digo.
>
> Para evitarme algunos problemas en general uso stringAsFactor=F cuando
> levanto datos porque algunas identificaciones alfanumericas las levanta
> como factores y si te comes eso luego gráficos por id o cosas así te salen
> con las labels de los factores y no con los valores en sí.
>
> Espero que fuera de ayuda, saludos
>
>
> Fernando Macedo
>
> El 04/08/16 a las 09:40, Mauricio Monsalvo escribió:
>
> Hola.
> Muchas gracias, Carlos y Javier.
> Les paso el scrip que utilicé y genera el problema raro, por si algún otro
> parámetro está mal indicado. La forma dec="," sí estaba indicada, pero
> podría estar en conflicto con otro parámetro, sin que yo lo sepa.
> No adjunto un pequeño recorte del archivo, porque al ser solo una parte, el
> problema no aparece... Y siendo más de 4,5 millones de registros, no es
> posible compartirlo con la lista y nomás abrirlo con un bloc de notas es
> molesto:
> pami <- read.table("Export.csv", header=T, sep=";", dec =",",
> #   colClasses=c("Factor", "int", "int", "Factor",
> rep("numeric", 2),
> #rep("int", 4), rep("Factor", 3),
> "numeric", rep("Factor", 3)),
>encoding = "UTF-8", quote="\"", comment.char = "")
> Importé los datos con Acccess y por lo que veo, tengo razones para
> sospechar que parte de ese .cvs se generó a partir de .xls que tienen o
> bien totales o bien tablas dinámicas, en lugar de matrices de datos
> regulares. Básicamente, porque para algunas variables de interés
> (factores), aparecen las filas el nombre de la variable y (v.g., en la
> variable LABORATORIO no aparece el nombre de un laboratorio sino el "valor"
> LABORATORIO y en PRODUCTO aparece el valor PRODUCTO mientras que el resto
> de las variables dan NULL).-
> Si eso es cierto, entonces, ¿puedo indicarle al R que importe todos los
> registros salvo aquellos en los que las variables a,b tengan los valores
> i,j? ¿tengo alguna forma de utilizar un ifelse al importar? De esa forma
> evitaría que read.table incorpore filas que vaya uno a saber qué tipo de
> datos tienen y eso podría ser que antes o luego, al convertir los tipos de
> datos, solo pierda aquellos que son basura pero no que el resultado sea
> impredecible.
> Un plan b que utilicé (siempre me fallan los planes b!!) es colClasses pero
> me apareció el problema de "valor inesperado: se espera un real y se obtuvo
> un 4,5%", etc. Si pudiera indicarle que al R que yo también espero un tipo
> de datos dado (v.g. un entero, un número, un factor) y que estamos de
> acuerdo en eso, así que cuando encuentro algo que no sea lo esperado lo
> convierta en NA, creo que también podría resolver la otra parte del
> problema que tiene mi archivo.
> Con importar los datos desde el access resolví mi problema, pero no mi
> duda: ¿por qué as.numeric "transforma" los valores? ¿Qué puede hacer que
> transforme 753,2256 a 61343 o
>
> 62,7688
> ​ a
> 17390? ¿Es alguna forma de "corrupción" o en alguna variante es algo
> esperable?
> Es claro que lo mejor que puedo hacer es volver a generar ese .csv sin
> errores, pero no estaría dentro de mis posibilidades a mano.
> Perdón por tantas dudas y preguntas, pero al ser un archivo de mucho peso,
> cada prueba y error consume demasiado tiempo (y memoria!!!), así que una
> mejor comprensión previa, teórica, del proceso me ayuda mucho.
> Gracias.
>
> El 3 de agosto de 2016, 18:28, Carlos Ortega <c...@qualityexcellence.es> 
>

Re: [R-es] ¿Qué hace as.numeric()?

[Fernando Macedo]

En general lo que yo uso en esos casos es as.numeric(as.character(X))

No se los términos correctos pero los factores aunque se muestren con los
nombres de las diferentes clases, internamente son clases separadas que se
nombran como enteros por ejemplo del 1 al n de clases. Cuando usas
directamente as.nuemric sobre un factor, este toma los numeros de las
clases y no el valor de clase.

Fijate en el código que te mando a continuación y lo verás mejor:


x=as.factor(letters[8:18])
levels(x)
labels(x)

as.numeric(x)
as.character(x)


x=as.factor(8:18)
levels(x)
labels(x)

as.numeric(x)
as.character(x)
as.numeric(as.character(x))


Usé labels en el código aunque no se si son exatamente las labels de los
factores, pero usandola ejemplifica justamente lo que digo.

Para evitarme algunos problemas en general uso stringAsFactor=F cuando
levanto datos porque algunas identificaciones alfanumericas las levanta
como factores y si te comes eso luego gráficos por id o cosas así te salen
con las labels de los factores y no con los valores en sí.

Espero que fuera de ayuda, saludos


Fernando Macedo

El 04/08/16 a las 09:40, Mauricio Monsalvo escribió:

Hola.
Muchas gracias, Carlos y Javier.
Les paso el scrip que utilicé y genera el problema raro, por si algún otro
parámetro está mal indicado. La forma dec="," sí estaba indicada, pero
podría estar en conflicto con otro parámetro, sin que yo lo sepa.
No adjunto un pequeño recorte del archivo, porque al ser solo una parte, el
problema no aparece... Y siendo más de 4,5 millones de registros, no es
posible compartirlo con la lista y nomás abrirlo con un bloc de notas es
molesto:
pami <- read.table("Export.csv", header=T, sep=";", dec =",",
#   colClasses=c("Factor", "int", "int", "Factor",
rep("numeric", 2),
#rep("int", 4), rep("Factor", 3),
"numeric", rep("Factor", 3)),
   encoding = "UTF-8", quote="\"", comment.char = "")
Importé los datos con Acccess y por lo que veo, tengo razones para
sospechar que parte de ese .cvs se generó a partir de .xls que tienen o
bien totales o bien tablas dinámicas, en lugar de matrices de datos
regulares. Básicamente, porque para algunas variables de interés
(factores), aparecen las filas el nombre de la variable y (v.g., en la
variable LABORATORIO no aparece el nombre de un laboratorio sino el "valor"
LABORATORIO y en PRODUCTO aparece el valor PRODUCTO mientras que el resto
de las variables dan NULL).-
Si eso es cierto, entonces, ¿puedo indicarle al R que importe todos los
registros salvo aquellos en los que las variables a,b tengan los valores
i,j? ¿tengo alguna forma de utilizar un ifelse al importar? De esa forma
evitaría que read.table incorpore filas que vaya uno a saber qué tipo de
datos tienen y eso podría ser que antes o luego, al convertir los tipos de
datos, solo pierda aquellos que son basura pero no que el resultado sea
impredecible.
Un plan b que utilicé (siempre me fallan los planes b!!) es colClasses pero
me apareció el problema de "valor inesperado: se espera un real y se obtuvo
un 4,5%", etc. Si pudiera indicarle que al R que yo también espero un tipo
de datos dado (v.g. un entero, un número, un factor) y que estamos de
acuerdo en eso, así que cuando encuentro algo que no sea lo esperado lo
convierta en NA, creo que también podría resolver la otra parte del
problema que tiene mi archivo.
Con importar los datos desde el access resolví mi problema, pero no mi
duda: ¿por qué as.numeric "transforma" los valores? ¿Qué puede hacer que
transforme 753,2256 a 61343 o

62,7688
​ a
17390? ¿Es alguna forma de "corrupción" o en alguna variante es algo
esperable?
Es claro que lo mejor que puedo hacer es volver a generar ese .csv sin
errores, pero no estaría dentro de mis posibilidades a mano.
Perdón por tantas dudas y preguntas, pero al ser un archivo de mucho peso,
cada prueba y error consume demasiado tiempo (y memoria!!!), así que una
mejor comprensión previa, teórica, del proceso me ayuda mucho.
Gracias.

El 3 de agosto de 2016, 18:28, Carlos Ortega
<c...@qualityexcellence.es> <c...@qualityexcellence.es>
escribió:


Tranquilo que no te han hackeado tu "R"...

Simplemente que al importar tu CSV, no has indicado que los decimales son
las ",". Y ese campo lo importa como un character (un string). Y cuando lo
conviertes a numeric, el resultado es un tanto impredecible.

Si utilizas read.table para importar, simplemente incluye el parámetro
"dec" de esta forma "read.table(. , *dec = ","*). Esta vez, esa
columna será numeric directamente.

Saludos,
Carlos Ortegawww.qualityexcellence.es




El 3 de agosto de 2016, 23:05, <javier.ruben.marcu...@gmail.com>
<javier.ruben.marcu...@gmail.com> escribió:


Es

Re: [R-es] Exportar datos en formato de Excel

[Fernando Macedo]

Que error te dá el uso de xlsx?

Lo he probado tanto en windows 10 como en Ubuntu 16.04 y no he tenido
problemas.

Saludos



Fernando Macedo

El 26/07/16 a las 07:22, Alexa Aristizabal escribió:

Buenos días a todos!

Estoy trabajando con una base de datos que directamente he descargado de
internet y después de prepararla un poco necesito exportarla a Excel he
intentando con las dos opciones que mencionaré al final pero ninguna
funciona, de qué otra manera puedo exportar esos datos a Excel... muchas
gracias por su ayuda y pronta respuesta!

1)

library(xlsx)
library(rJava)
library(xlsxjars)
write.xlsx(mydata, file="mydata.xlsx")

2)

library(xlsReadWrite) #abrimos el paquete
write.xls(prueba, file="datanueva.xls",sheet="lapop10")

[[alternative HTML version deleted]]

___
R-help-es mailing
listR-help-es@r-project.orghttps://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

Re: [R-es] Codigo

[Fernando Macedo]

Hola, yo en general uso una opción más desprolija y que puede ser menos
efectiva pero si la cantidad de lotes no es excesiva no sería
extremadamente
lenta.

Uso for() en general usando los datos de id de los animales, lotes u lo
que sea.

# inicializo una variable para almacenar resultados
salidas=NULL
for( i in unique(data$id)){
tmp=data[data$id==i,]
.
salidas=rbind(salidas,"salidas")
}

De ahí saco lm, plots etc para cada subset de datos.
Igual no es la mejor solución pero me saca del paso.

Saludos

F. Macedo

El 30/05/16 a las 11:06, Carlos Ortega escribió:
> Hola,
>
> Puedes utilizar el código de Oliver utilizando la librería "broom" que
> permite obtener los parámetros (coeficientes) y características del modelo
> (null.deviance, AIC, BIC) en un cómodo data.frame
>
> El código sería algo así como esto.
>
> library(broom)
> L <- list(L1, L2..., L120)
>
> ajuste <- function(L) {
> g <- glm(y ~., data = L)
> g_df <- tidy(g) #tidy es una función del paquete "broom" que
> devuelve los coeficientes y sus errores.
> return(g_df)
> }
>
> fit <- apply(L, ajuste)
>
>
> Saludos,
> Carlos Ortega
> www.qualityexcellence.es
>
> El 30 de mayo de 2016, 15:15, Andres Hirigoyen 
> escribió:
>
>> Oliver gracias por le pista!
>> Es un poco mas complicado, el código tiene varios pasos incluidos calculo
>> de nuevas variables con los betas del glm y otras vueltas. Necesitaría una
>> sentencia que tome cada lote haga los cálculos por separado y luego los une
>> en el dataframe de salida
>>
>> El 30 de mayo de 2016, 10:02, Olivier Nuñez  escribió:
>>
>>> Mira lapply 
>>>
>>> Si L= list(L1,L2,...,L120) es una lista de tus lotes
>>>
>>> ajuste <- function(L) glm(y~x,data=L)
>>> fit=lapply(L1,ajuste)
>>>
>>> donde "fit" es la lista de 120 ajustes.
>>>
>>> Un saludo. Olivier
>>>
>>> - Mensaje original -
>>> De: "Andres Hirigoyen" 
>>> Para: r-help-es@r-project.org
>>> Enviados: Lunes, 30 de Mayo 2016 14:55:19
>>> Asunto: [R-es] Codigo
>>>
>>> Buenos días tengo una consulta sobre un código rutinario que quiero
>>> ejecutar.
>>>
>>> Tengo 120 Lotes con un ID diferente (del C001 al C120) a cada uno de  los
>>> cuales debo efectuares un GLM y con los parámetros obtenidos calcular
>> otras
>>> variables para luego hacer gráficas, razón por la cual no puedo
>> procesarlos
>>> todos juntos.
>>> Intente hacer una sentencia repeat() o con for() para que me ejecute de
>>> forma individual cada lote y no tener que hacerlo a mano, pero no me
>>> sale...
>>> ¿¿Alguna idea??
>>>
>>>  [[alternative HTML version deleted]]
>>>
>>> ___
>>> 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-help-es mailing list
R-help-es@r-project.org
https://stat.ethz.ch/mailman/listinfo/r-help-es

Re: [R-es] usar R a traves de la web

[Fernando Macedo]

 Talvez esta te pueda servir:

http://pbil.univ-lyon1.fr/Rweb/

Por lo que vi trabaja con la versión 3.1.1.

Saludos.

Fernando Macedo

El 06/03/16 a las 12:28, eric escribió:

Hola Jesus, muchas gracias, esta opcion se ve bastante bien, aunque no
encuentro un modo de subir mis archivos de datos, pero debe poderse, no ?

Muchas gracias,

Eric.




On 03/05/2016 09:03 AM, Jesús Para Fernández wrote:

Buscas algo asi?

http://www.r-fiddle.org/#/



 > From: ericconchamu...@gmail.com
 > To: r-help-es@r-project.org
 > Date: Sat, 5 Mar 2016 09:01:42 -0300
 > Subject: [R-es] usar R a traves de la web
 >
 > Estimada comunidad, para mi trabajo uso latex y R normalmente, ahora
 > debo viajar sin mi portatil, pero tengo la opcion de llevar un pequeño
 > tablet (con android) ... para suplir latex he estado usando
 > www.overleaf.com y trabaja excelente, practicamente todos los paquetes
 > que uso estan disponibles ahi ... pero no he encontrado algo similar
para R.
 >
 > Saben ustedes si existe algun proyecto que permita usar R en la web ? ya
 > he mirado muchas opciones
 >
(
https://nsaunders.wordpress.com/2009/11/30/a-brief-survey-of-r-web-interfaces/)


 > como las de Rstudio (tengo android, no puedo instalar R en el tablet),
 > tampoco tengo la opcion de instalar un RApache por ejemplo, pero ninguna
 > me sirve ... necesito una pagina en que simplemente entre, pegue el
 > codigo y me devuelva las salidas sin tener que instalar nada localmente.
 >
 > Muchas gracias,
 >
 > Eric.
 >
 >
 >
 > --
 > Forest Engineer
 > Master in Environmental and Natural Resource Economics
 > Ph.D. student in Sciences of Natural Resources at La Frontera University
 > Member in AguaDeTemu2030, citizen movement for Temuco with green city
 > standards for living
 >
 > Nota: Las tildes se han omitido para asegurar compatibilidad con algunos
 > lectores de correo.
 >
 > ___
 > 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

Re: [R-es] XLConnect

[Fernando Macedo]

No trabajo en windows, pero talvez este hilo te pueda ayudar:

http://stackoverflow.com/questions/29522088/rjava-install-error-java-home-cannot-be-determined-from-the-registry

Saludos

DMTV Fernando Macedo
Asistente del área Mejoramiento Genético
Facultad de Veterinaria - UdelarR - Uruguay
Tel: 26284291
Cel.: 098596947
ferm...@gmail.com

El 20/02/16 a las 10:26, Andres Hirigoyen escribió:

Estimados estoy teniendo problema con el paquete XLConnect, por lo que
averigüe es un tema de 32 vs 64 ya que cambié de pc. El error es el
siguiente

Loading required package: XLConnectJars
Error : .onLoad failed in loadNamespace() for 'rJava', details:
   call: fun(libname, pkgname)
   error: JAVA_HOME cannot be determined from the Registry
Error: package ‘XLConnectJars’ could not be loaded

Tengo varios informes hechos con este paquete y necesito usarlo.
Gracias por las ideas
Andres

[[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-help-es mailing list
R-help-es@r-project.org
https://stat.ethz.ch/mailman/listinfo/r-help-es

Re: [R-es] Corregir mismo ID para individuos diferentes en una serie temporal

[Fernando Macedo]

Buenas, si tienes la fecha de nacimiento una salida sencilla para salir 
del paso es concatenar el ID con el año de nacimiento.

Saludos

Fernando Macedo

El 25/01/16 a las 14:11, Ruben Bermad escribió:
> Hola a todos,
> Quer�a preguntar si alguno sabe como puedo identificar registros con un mismo 
> ID en el tiempo, pero que hacer referencia a objetos o individuos diferentes.
> En mi caso en particular estoy estudiando un animal que tiene una vida media 
> cercana 2 a�os, y tengo una serie longitudinal de 25 a�os. El problema es que 
> durante el muestreo en algunos casos durante la recoleccion de los datos, se 
> repitieron los nombres de los individuos porque se asumen que si ha pasado 10 
> a�os no puede ser el mismo individuo. Y el problema que yo tengo es que no se 
> como detectar de manera autom�tica este tipo de errores.
> Hab�a pensado era en registrar la primera aparici�n de cada nombre (e.g 
> indiv_1, y ver el tiempo que ha pasado en comparaci�n con el resto de 
> registros para ese mismo individuo, y en el caso que fuera superior (por 
> ejemplo a 36 meses para estar totalmente seguros), que ese individuo que 
> hab�a sido registrado como "indiv_1" sea renombrado (e.g. indiv_150), y 
> cambiar todos los siguientes registros de indiv_1 a indiv_150.
> Esto parece sencillo, pero lo complicado al revisar todos los casos nombrados 
> ahora como indiv_150 ya que es posible que el nombre indiv_1 haya sido usado 
> para varios individuos diferentes a lo largo de la serie (e.g. en el a�o 1, 
> 10 y 20). Entonces lo que hab�a pensado es hacer un bucle para cada 
> individuo, pero no consigo que cada vez que cambia el nombre de un individuo 
> (e.g. en el a�o 10) capture la nueva fecha para determinar si los siguientes 
> nombres hacen referencia al mismo individuo u a otro muy posterior en el 
> tiempo (e.g. a�o 20).
> Esta pregunta la pregunte hace tiempo en 
> stackoverflowhttp://stackoverflow.com/questions/32310520/identify-objects-with-repeated-measures-and-with-the-same-id-between-years,
>  pero no obtuve una respuesta que solucionara el problema, y los posteriores 
> intentos que he estado haciendo tampoco han sido muy buenos que se digan (os 
> lo copio al final del mensaje).
> Por ello os quer�a preguntar si alguno sabe como puedo ir registrando y 
> cambiando los IDs a lo largo del tiempo.
> Muchas gracias por adelantado, Un cordial saludo, Rub�n
> Codigo usadodatabase es la base de datos con la serie temporalID_original es 
> el identificado original que tiene cada individuoMonth_Capt es la variable 
> que me indica en que momento fue capturado cada individuo y por tanto si es 
> posible o no que el individuo sea el mismo a lo largo del tiempo.
> newID <-sapply(unique(database$ID_original), function(x) 
> c(0,cumsum(diff(database$Month_Capt[database$ID_original==x]))%%48))names(newID)<-(unique(database$ID_original))
> new_df<-data.frame(database$ID_original,database$Month_Capt,IDcond=NA,new_ID=NA)for(i
>  in unique(database$ID_original)){  
> new_df[new_df[,1]==i,3]<-newID[[which(unique(database$ID_original)==i)]]}ltrs<-c(LETTERS,apply(combn(LETTERS,2,simplify
>  = T),2,function(x) paste(x,sep = "",collapse = "")))
> letterwrap <- function(n, depth = 1) {  args <- lapply(1:depth, FUN = 
> function(x) return(LETTERS))  x <- do.call(expand.grid, args = list(args, 
> stringsAsFactors = F))  x <- x[, rev(names(x)), drop = F]  x <- 
> do.call(paste0, x)  if (n <= length(x)) return(x[1:n])  return(c(x, 
> letterwrap(n - length(x), depth = depth + 1)))}
> ltrs <- letterwrap(nrow(database)) # Create as many letters as unique IDs
>
> ltrn<-0for(i in 1:nrow(new_df)){  if(new_df[i,3]==0) 
> {ltrn<-ltrn+1;new_df[i,4]<-ltrs[ltrn]}  else 
> {ind<-which(new_df[,1]==new_df[i,1])ind<-ind[ind<i]
> new_df[i,4]<-tail(new_df[ind,4],1)}}
>   
>   [[alternative HTML version deleted]]
>
>
>
> ___
> 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

Re: [R-es] problema as.numeric

[Fernando Macedo]

Otra cosa que se puede hacer con factors es usar 
as.numeric(as.character(x$factor))


Saludos

DMTV Fernando Macedo
Asistente del área Mejoramiento Genético
Facultad de Veterinaria - UdelarR - Uruguay
Tel: 26284291
Cel.: 098596947
ferm...@gmail.com

El 10/11/2015 a las 04:47 p.m., Javier Rubén Marcuzzi escribió:

Gracias Carlos

Javier Rubén Marcuzzi
Técnico en Industrias Lácteas
Veterinario



De: Carlos Ortega
Enviado: martes, 10 de noviembre de 2015 16:43
Para: Javier Rubén Marcuzzi
CC: r-help-es@r-project.org
Asunto: Re: [R-es] problema as.numeric


Hola,
b$Edad es un "factor".
En vez de convertir a "numeric", convierte a "vector"
b$Edad <- as.vector(b$Edad)
Saludos,
Carlos Ortega
www.qualityexcellence.es

El 10 de noviembre de 2015, 20:31, Javier Rubén Marcuzzi 
<javier.ruben.marcu...@gmail.com> escribió:
Estimados

Hay un problema, miren lo que sale en b$Edad, esos valores son correctos, pero 
luego realizo str$Edad, aparecen 24, 24, 24, 5 …. , convierto a números con b$Edad 
<- as.numeric(b$Edad) y los valores son 24, 24, 25 … (valores que no son 
reales).

Es fácil, lo realice muchas veces pero ahora estoy confundido. ¿Alguna ayuda? 
Gracias


b$Edad

   [1] 5   5   5   0,5 0,5 5   5   2   9   9   9   9   9   9   9   9   9
  [18] 7   7   5   16  16  0,3 2   5   5   5   5   7   7   7   4   4   4
  [35] 4   13  5   5   5   0,3 0,3 0,3 6   6   7   10  10  10  3   0,9 0,9
  [52] 0,9 10  8   8   8   8   3   3   3   10  10  10  1   15  15  15  3
  [69] 3   2   2   8   8   11  11  11  0,1 0,1 0,1 0,1 3   12  10  10  10
  [86] 3   3   3   4   2   0,3 0,3 0,3 10  0,8 0,8 0,8 8   8   8   1   1
[103] 1   1   1   8   7   5   3   6   4   16  17  11  9   10
[120] 1   2   2   2   3   13  14  5   5   3   3   6   4   7   1,4 0,4
[137] 6   2   3   4   10  9   7   9   8   8   8   8   8   10  13  13  0,8
[154] 1,8 6   7   1   1   5   8   8   10  9   8   2   2   2   7   10  9
[171] 8   10  10  10  0,4 4   6   5   3   2   2   10  8   9   4   4   11
[188] 11  6   5   7   4   5   4   0,5 0,5 0,7 12  12  14  14
[205] 16  15  8   8   4   0,4 1,4 0,4 2,4 0,4 5   6   4   2   3   2   2
[222] 4   4   4   4   1   2   3   6   7   1   2   7   7
28 Levels:  0,1 0,3 0,4 0,5 0,7 0,8 0,9 1 1,4 1,8 10 11 12 13 14 15 ... 9

str(b$Edad)

  Factor w/ 28 levels "","0,1","0,3",..: 24 24 24 5 5 24 24 20 28 28 ...

b$Edad <- as.numeric(b$Edad)
str(b$Edad)

  num [1:234] 24 24 24 5 5 24 24 20 28 28 ...


Javier Rubén Marcuzzi
Técnico en Industrias Lácteas
Veterinario

 [[alternative HTML version deleted]]

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






---
El software de antivirus Avast ha analizado este correo electrónico en busca de 
virus.
https://www.avast.com/antivirus

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

Re: [R-es] Crear un GUI para R con tcltk

[Fernando Macedo]

No opinaré sobre el código puesto que no lo leí. Pero comentar que en 
particular he tenido problemas copiando datos desde excel, en general me 
resulta mejor copiarlos de excel, pegarlos en un editor de texto 
cualquiera y luego copiarlos a R. Por que? Ni idea, como lo he usado 
puntualmente no me he puesto a profundizar en el tema, pero he tenido 
ese problema.

Saludos

DMTV Fernando Macedo
Ayudante del área Mejoramiento Genético
Facultad de Veterinaria - UdelarR - Uruguay
Tel: 26284291
Cel.: 098596947
ferm...@gmail.com

El 08/07/15 a las 09:54, Jesús Para Fernández escribió:
 BUenas,

 Quiero crear un GUI muy simple, el cual consiste en una ventana, que al 
 abrirse tiene dos botones. El primer boton, copiar, es un boton que ejecutar�a

 datos-read.table(clipboard,header=T,dec=,,sep=\t)

 Y el segundo boton muestra todos los data.frames que hay en R

 Para ello, estoy usando tcltk, por lo que hago lo siguiente:

 require(tcltk)
 tt - tktoplevel()
 tktitle(tt) - Mi primer programa

 # Create a variable to keep track of the state of the dialog window:
 #  If the window is active,done =  0
 #  If the window has been closed using the OK button,  done = 
 1
 #  If the window has been closed using the Cancel button or destroyed, done = 
 2
 done - tclVar(0)   # tclVar() creates a Tcl variable

 # Create two buttons and for each one, set the value of the done variable
 # to an appropriate value
 OK.but - tkbutton(tt, text =   OK  ,
  command = function() tclvalue(done) - 1)
 Cancel.but - tkbutton(tt, text = Cancel,
  command = function() tclvalue(done) - 2)

 # Place the two buttons on the same row in their assigned window (tt)
 tkgrid(OK.but, Cancel.but)

 # Capture the event Destroy (e.g. Alt-F4 in Windows) and when this happens,
 # assign 2 to done
 tkbind(tt, Destroy, function() tclvalue(done) - 2)

 tkfocus(tt) # Place the focus to our tk window

 # Do not proceed with the following code until the variable done is non-zero.
 # (but other processes can still run, i.e., the system is not frozen)
 tkwait.variable(done)

 # The variable done is now non-zero, so we would like to record its value 
 before
 # destroying the window tt.  If we destroy it first, then done will be set to 
 2
 # because of our earlier binding, but we want to determine whether the user
 # pressed OK (i.e., see whether done is equal to 1)

 doneVal - as.integer(tclvalue(done))   # Get and coerce content of a Tcl 
 variable
 tkdestroy(tt)

 # Test the result
 if (doneVal == 1) {
 datos-read.table(clipboard,header=T,dec=,,sep=\t)
 }
 if (doneVal == 2) {
 ls()
 }


 Esto funciona al crearlo en el script de R, pero el poortapapeles no me copia 
 las celdas de excel, sino todo el c�digo anterior.

 Podeis echarme una mano??

 Gracias!!!
   
   [[alternative HTML version deleted]]



 ___
 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

Re: [R-es] librerias para programar una interfaz grafica en R ?

[Fernando Macedo]

En algún momento hace un par de años atrás usé gWidgets para ingresar 
valores de forma interactiva. No sé como esta su desarrollo actualmente 
ni si existen otras mejores opciones actualmente.


Saludos

DMTV Fernando Macedo
Ayudante del área Mejoramiento Genético
Facultad de Veterinaria - UdelarR - Uruguay
Tel: 26284291
Cel.: 098596947
ferm...@gmail.com

Alcanzó la sabiduría quien supo morir tan seguro como nació.  Séneca

El 09/06/15 a las 17:07, eric escribió:
Estimados, he estado mirando en la internet si es posible programar 
con R una interfaz grafica para pedir el ingreso de datos por ejemplo, 
pero invariablemente obtengo paginas que hablan de interfaces graficas 
(rkward, rstudio, r-commander, etc) para R o de las librerias para 
hacer graficos (ggpolt, lattice, etc) ... alguien me puede orientar 
donde buscar o si estas existen ?


Saludos y gracias,

Eric.






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

Re: [R-es] Temas para word markdown

[Fernando Macedo]

Muchas gracias Daniel! La verdad que resulta bastante sencillo... Había 
encontrado otros editores de que tenían mejores plantillas pero no sabía 
como hacer para incluirlas así que ahora resulta muy fácil.

Un abrazo!

DMTV Fernando Macedo
Ayudante del área Mejoramiento Genético
Facultad de Veterinaria - UdelarR - Uruguay
Tel: 26284291
Cel.: 098596947
ferm...@gmail.com

Alcanzó la sabiduría quien supo morir tan seguro como nació.  Séneca

El 08/04/15 a las 10:11, daniel escribió:
 Fernando, este enlace quizás te sirva https://vimeo.com/110804387

 Hace ya muchos meses hice algo de esa manera, creando el template en 
 Word, espero siga siendo válido.

 Daniel Merino


 El 8 de abril de 2015, 8:44, Fernando Macedo ferm...@gmail.com 
 mailto:ferm...@gmail.com escribió:

 Buenas, estaba siguiendo el hilo de Informes Periódicos en R de Jesus
 Herranz y me surgió una duda. Actualmente estoy tratando de usar
 markdown para todo así cualquier cosa que haga me queda
 presentable para
 informar o presentar en algún lugar. En general estoy usando html y o
 pdf principalmente porque cuando trato de compilar en word la
 verdad que
 queda bastante feíto.

 Alguién sabe, o puede indicarme un enlace que indique, como agregar y
 cambiar los temas para word?

 Saludos

 DMTV Fernando Macedo
 Ayudante del área Mejoramiento Genético
 Facultad de Veterinaria - UdelarR - Uruguay
 Tel: 26284291
 Cel.: 098596947
 ferm...@gmail.com mailto:ferm...@gmail.com

 Alcanzó la sabiduría quien supo morir tan seguro como nació.  Séneca

 El 08/04/15 a las 05:06, Jesus Herranz escribió:
  Finalmente era un tema de versión de RStudio como algunos
 compañeros habían indicado.
 
  Muchas gracias a todos.
 
 
 
 
 
  De: Carlos Ortega [mailto:c...@qualityexcellence.es
 mailto:c...@qualityexcellence.es]
  Enviado el: martes, 07 de abril de 2015 16:30
  Para: Jesus Herranz
  CC: Jorge I Velez; R-help-es
  Asunto: Re: [R-es] Informes periódicos con R
 
 
 
  Hola Jesús,
 
  Mira los ejemplos, videos y hasta un libro de referencia en la
 propia página del creador del paquete:
 
  http://yihui.name/knitr/
 
  Saludos,
 
  Carlos Ortega
 
  www.qualityexcellence.es http://www.qualityexcellence.es
 
 
 
  El 7 de abril de 2015, 15:36, Jesus Herranz
 jesus.herr...@imdea.org mailto:jesus.herr...@imdea.org escribió:
 
  Hola Jorge
 
  Perdona que sea tan pesado, pero no encuentro el fichero docx.
 Tampoco me
  manejo muy bien con RStudio.
 
  He insertado lo que me has dicho; pero solo tengo en la pantalla
 la opción
  “Knit HTML” y siempre me genera un HTML.
 
  He instalado “pander” pero no obtengo el docx
 
  Gracias
 
  Jesús
 
 
 
 
 
  De: Jorge I Velez [mailto:jorgeivanve...@gmail.com
 mailto:jorgeivanve...@gmail.com]
  Enviado el: martes, 07 de abril de 2015 13:54
  Para: Jesus Herranz
  CC: R-help-es
  Asunto: Re: [R-es] Informes periódicos con R
 
 
 
  Hola Jesus,
 
 
 
  La idea es que tengas un documento markdown en RStudio y que el
 encabezado
  sea similar a
 
 
 
  ---
 
  title: Aquí va tu título
 
  author: Aquí quien escribió el documento
 
  date: Y la fecha...
 
  output: word_document
 
  ---
 
 
 
  Despues de los segundos --- escribes el texto que necesitas
 siguiendo la
  sintaxis clasica de markdown.
 
 
 
  Una vez compilado el documento desde RStudio (tambien puede hacerse
  directamente desde R con la funcion source) se generara el
 documento .docx
  que contiene toda la informacion que necesitas.
 
 
 
  Espero sea un poco mas claro.
 
 
 
  Saludos,
 
  Jorge.-
 
 
 
 
 
 
 
  2015-04-07 21:50 GMT+10:00 Jesus Herranz
 jesus.herr...@imdea.org mailto:jesus.herr...@imdea.org:
 
  Hola, Jorge
 
  Lo he mirado y parece que es una opción bastante buena, pero no
 logro saber
  cómo se salva en Word, solo lo logro en html
 
  Muchas gracias
 
  Jesús
 
 
 
 
 
 
 
  De: Jorge I Velez [mailto:jorgeivanve...@gmail.com
 mailto:jorgeivanve...@gmail.com]
  Enviado el: martes, 07 de abril de 2015 11:40
  Para: Jesus Herranz
  CC: R-help-es
  Asunto: Re: [R-es] Informes periódicos con R
 
 
 
 
  Hola Jesus,
 
  Una forma es RStudio + Markdown.  Hay infinidad de tutoriales en
 internet,
  pero la referencia basica es http://rmarkdown.rstudio.com/  Puedes
  organizar las salidas para que sean en Word, PDF o HTML.  La
 escongencia
  depende de lo que quieras hacer

Re: [R-es] Familia *pply

[Fernando Macedo]

Muchas gracias! Algunos blogs sigo aunque no con la frecuencia que me 
gustaría.
El libro me viene bien pues es en lo que me estoy metiendo, con datos de 
grandes dimensiones.

Saludos!!!

Fernando Macedo

El 21/03/15 a las 13:11, Carlos Ortega escribió:

 Hola Fernando,

 No, no sabía a priori si iba a ser más rápido o más lento.
 Utilicé la estructura de Sys.time() que tenías construida en tu 
 ejemplo para medir los resultados.

 Y como recomendación, hay muchos blogs que hablan de como programar de 
 forma eficiente R.
 Pero si buscas un libro, acabo de leer este y me parece que lo trata 
 muy bien:

 http://www.amazon.es/High-Performance-Programming-Aloysius-Lim/dp/1783989262/ref=sr_1_1?ie=UTF8qid=1426953979sr=8-1keywords=R+high+performance+programming

 Saludos,
 Carlos Ortega
 www.qualiytexcellence.es http://www.qualiytexcellence.es

 El 21 de marzo de 2015, 14:11, Fernando Macedo ferm...@gmail.com 
 mailto:ferm...@gmail.com escribió:

 Muchas gracias a ambos Carlos y Jorge por las respuestas. Pido
 disculpas en la demora de respuesta, pero estuvo complicada la
 semana.

 La pregunta era un ejercicio de ejemplo para poder entender mejor
 los usos, creo que me armaré una guía en markdown con ejemplos
 varios para ir consultando cuando me salgan dudas de como usarlos.

 En realidad no importaba tanto si mejorara demasiado los tiempos
 sino el cómo se podría implementar una solución en base a la
 familia; pero a propósito Carlos, sabias de antemano que no
 mejoraría los tiempos? si sí, como evalúas previamente si el uso
 de una función de la familia tendrá mejor desempeño que un for()?
 Si me pueden recomendar algún material de lectura más profundo
 sobre este tema sería de mucha ayuda.

 Muchísimas gracias!

 Abrazos!

 Fernando Macedo

 El 18/03/15 a las 22:03, Carlos Ortega escribió:
 Hola,

 Una forma de hacerlo es así (destaco en negrita los cambios).
 De todas formas, ya te adelanto que no es un caso en el que
 aplicar, en este caso mapply(), mejore los tiempos frente a la
 solución basada en un bucle.

 #-
 t1 - Sys.time()

 *myfun - function(x,y) { data[x,y] }*

 medias - replicate(1000,{
   sel - sample(1:20,10)
   pareja - sample(sel,100,replace = T)
   ta - Sys.time()
 *#cambio
resnew - mapply(myfun, pareja, col)
  #cambio *
   tb - Sys.time()
   media - mean(resnew)
   tt - tb-ta
   c(media,tt)
 })

 t2 - Sys.time()

 diftime=(t2-t1)[[1]]
 diftime

 sum(medias[2,])/diftime

 #-



 Saludos,
 Carlos Ortega
 www.qualiytexcellence.es http://www.qualiytexcellence.es

 El 19 de marzo de 2015, 1:14, Fernando Macedo ferm...@gmail.com
 mailto:ferm...@gmail.com escribió:

 Hola Jorge, muchas gracias por tu pronta respuesta, no me di
 cuenta que
 el formateo podría causar problemas, envío de nuevo el código
 sin formatos.
 La idea básica es para un set de números de columnas
 (desordenados) y un
 set de numeros de fila el loop lo que hace es ir a la fila y
 columna
 correspondiente de data, tomar el valor y luego hacer la
 media sobre esos.



 data=matrix(rnorm(100*20),20,100)
 col=sample(1:100,100)

 t1=Sys.time()
 medias=replicate(1000,{
sel=sample(1:20,10)
pareja=sample(sel,100,replace = T)
ta=Sys.time()
recep=NULL
for(i in 1:100){
  n=col[i]
  m=pareja[i]
  c=data[m,n]
  recep=c(recep,c)
}
tb=Sys.time()
media=mean(recep)
tt=tb-ta
c(media,tt)
 },simplify=T)

 t2=Sys.time()
 diftime=(t2-t1)[[1]]

 sum(medias[2,])/diftime



 Fernando Macedo

 El 18/03/15 a las 21:06, Jorge I Velez escribió:
  Hola Fernando,
 
  No puedo ver las negritas, pero intuyo que lo que quieres
 es calcular
  la media por columnas?  Si es asi, hay dos maneras:
 
  1. Usa colMeans(x), donde x es tu matriz de datos
  2. Usa apply(x, 2, mean) donde x es tu matriz de datos
 
  Existe una tercera pero menos conocida posibilidad que es
 usando el
  paquete matrixStats.  Esta implementado en C en su mayoria
 y, de
  acuerdo con el autor, es mucho mas rapido que la familia
 *apply.  En
 
 
 http://cran.r-project.org/web/packages/matrixStats/vignettes/matrixStats-methods.html
  puedes encontrar mas informacion.
 
  Saludos cordiales,
  Jorge.-
 
 
 
  2015-03-19 11:01 GMT+11:00 Fernando Macedo
 ferm...@gmail.com mailto:ferm...@gmail.com
  mailto:ferm...@gmail.com

Re: [R-es] Familia *pply

[Fernando Macedo]

Hola Jorge, muchas gracias por tu pronta respuesta, no me di cuenta que 
el formateo podr�a causar problemas, env�o de nuevo el c�digo sin formatos.
La idea b�sica es para un set de n�meros de columnas (desordenados) y un 
set de numeros de fila el loop lo que hace es ir a la fila y columna 
correspondiente de data, tomar el valor y luego hacer la media sobre esos.



data=matrix(rnorm(100*20),20,100)
col=sample(1:100,100)

t1=Sys.time()
medias=replicate(1000,{
   sel=sample(1:20,10)
   pareja=sample(sel,100,replace = T)
   ta=Sys.time()
   recep=NULL
   for(i in 1:100){
 n=col[i]
 m=pareja[i]
 c=data[m,n]
 recep=c(recep,c)
   }
   tb=Sys.time()
   media=mean(recep)
   tt=tb-ta
   c(media,tt)
},simplify=T)

t2=Sys.time()
diftime=(t2-t1)[[1]]

sum(medias[2,])/diftime



Fernando Macedo

El 18/03/15 a las 21:06, Jorge I Velez escribi�:
 Hola Fernando,

 No puedo ver las negritas, pero intuyo que lo que quieres es calcular 
 la media por columnas?  Si es asi, hay dos maneras:

 1. Usa colMeans(x), donde x es tu matriz de datos
 2. Usa apply(x, 2, mean) donde x es tu matriz de datos

 Existe una tercera pero menos conocida posibilidad que es usando el 
 paquete matrixStats.  Esta implementado en C en su mayoria y, de 
 acuerdo con el autor, es mucho mas rapido que la familia *apply.  En 
 http://cran.r-project.org/web/packages/matrixStats/vignettes/matrixStats-methods.html
  
 puedes encontrar mas informacion.

 Saludos cordiales,
 Jorge.-



 2015-03-19 11:01 GMT+11:00 Fernando Macedo ferm...@gmail.com 
 mailto:ferm...@gmail.com:

 Buenas a todos. Desde hace un tiempo estoy tratando de aplicar las
 funciones de la familia *pply en todo lo que puedo, pero todav�a no es
 algo que me surja tan r�pidamente o naturalmente al momento de los
 loops
 como usar for().
 Conozco las ventajas de usar estas funciones y por eso mi intento de
 hacerme de ellas.

 Por ejemplo en este problema:

 data=matrix(rnorm(100*20),20,100)
 col=sample(1:100,100)

 t1=Sys.time()

 medias=replicate(1000,{
sel=sample(1:20,10)
pareja=sample(sel,100,replace = T)
ta=Sys.time()
 *recep=NULL**
 **  for(i in 1:100){**
 **n=col[i]**
 **m=pareja[i]**
 **c=data[m,n]**
 **recep=c(recep,c)**
 **  }**
 *  tb=Sys.time()
media=mean(recep)
tt=tb-ta
c(media,tt)
 })

 t2=Sys.time()

 diftime=(t2-t1)[[1]]

 sum(medias[2,])/diftime


 la parte que est� en negrita (si us� bien los Sys.time()) me
 representa
 (hice varias pruebas) aprox un 60% del tiempo total empleado.

 Mi pregunta es, para este ejemplo �c�mo plantear�an una soluci�n
 usando
 funciones *pply?
 Y luego ver cuanto aumenta en el rendimiento del uso del tiempo.

 De paso, la salida que obtengo es una matriz de 2 por 1000, cuando
 ser�a
 m�s interesante una matriz de 1000 por 2. Si se usa simplify = F como
 argumento de replicate() resulta en una lista. �Existe alg�n argumento
 que directamente obtenga una matriz de 1000 por 2? (Esto �ltimo
 pensando
 en de repente 10 o 100 de repeticiones y salidas m�s
 complejas).


 Saludos!

 --
 Fernando Macedo


 [[alternative HTML version deleted]]

 ___
 R-help-es mailing list
 R-help-es@r-project.org mailto: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] intercalar elementos de vectores

[Fernando Macedo]

 Buenas a todos.
Relato el problema:

- tengo un archivo de 316 columnas por 562000 filas (aprox.).
- esas 316 columnas representan 158 sujetos, o sea dos columnas por cada
individuo conteniendo información que debe ser condensada en una sola.

Lo que necesito es ir tomando las dos columnas de cada individuo e
intercalar los elementos de los vectores formando uno solo.

Ejemplificando sería algo así:

 a
[1] a a a a a
 b
[1] b b b b b
 c
 [1] a b a b a b a b a b


Estoy haciendo con un loop for pero es realmente muy lento. He buscado por
algún paquete que ya lo haga directamente pero no he tenido mucho éxito. Me
imagino que con sapply o apply pueda ser mucho más efectivo pero me ha
resultado complicado para entender la sintaxis de estas funciones cuando
involucra más de un objeto (vector, matriz, etc...).

Desde ya agradezco las sugerencias que puedan verter sobre este problema.

-- 
Fernando Macedo

[[alternative HTML version deleted]]

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

Re: [R-es] intercalar elementos de vectores

[Fernando Macedo]

 Muchas gracias a los dos, los ejemplos de uso de las funciones *apply
siempre son bienvenidos.

Saludos

Fernando Macedo

El 24/02/15 a las 12:12, Jorge I Velez escribió:

 Gracias, Carlos.

 Habia pensado en algo similar usando sapply():

 sapply(seq(1, ncol(vtmp), by = 2), function(i) c(rbind(as.character(vtmp[,
i]), as.character(vtmp[, i+1]

 Dependiendo de la dimension de los datos, quizas mapply() sea
mas eficiente que sapply().

 Saludos cordiales,
Jorge.-


 2015-02-25 1:01 GMT+11:00 Carlos Ortega c...@qualityexcellence.es:

  Hola,

  Este otro ejemplo a partir de la idea de Jorge, de cómo procesar toda la
 tabla que tienes:

  #Creo un data.frame de ejemplo todo con letras
  vtmp - as.data.frame(lapply(letters,function(x) { rep(x,each=50) }))
  names(vtmp) - paste(col,LETTERS,sep=)
  head(vtmp)
   colA colB colC colD colE colF colG colH colI colJ colK colL colM colN
 colO colP colQ colR colS colT colU colV colW colX colY colZ
 1abcdefghijklmn
 opqrstuvwxyz
 2abcdefghijklmn
 opqrstuvwxyz
 3abcdefghijklmn
 opqrstuvwxyz
 4abcdefghijklmn
 opqrstuvwxyz
 5abcdefghijklmn
 opqrstuvwxyz
 6abcdefghijklmn
 opqrstuvwxyz
 
  #Los números de columnas impares de mi data.frame
  matIndex - seq(1, dim(vtmp)[2], by=2)
 
  #Función para juntar dos columnas (idea de Jorge)
  mifun - function(x,y) c(rbind(as.vector(vtmp[,x]),as.vector(vtmp[,y])))
 
  #Resulado aplicando mapply. Coge dos columnas consecutivas y las alterna
  #y así de forma iterativa para cada una de las columnas que indica
 matIndex y la siguiente columna matIndex+1
  resultado - mapply(mifun,matIndex, matIndex+1)
  head(kk)
  [,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8] [,9] [,10] [,11] [,12] [,13]
 [1,] a  c  e  g  i  k  m  o  q  s   u   w   y
 [2,] b  d  f  h  j  l  n  p  r  t   v   x   z
 [3,] a  c  e  g  i  k  m  o  q  s   u   w   y
 [4,] b  d  f  h  j  l  n  p  r  t   v   x   z
 [5,] a  c  e  g  i  k  m  o  q  s   u   w   y
 [6,] b  d  f  h  j  l  n  p  r  t   v   x   z
 

  Saludos,
  Carlos Ortega
  www.qualityexcellence.es

 El 24 de febrero de 2015, 14:10, Fernando Macedo ferm...@gmail.com
 escribió:

  Excelente! Ahora corre muy rápido. No conocía ese método, creo que me va a
 resultar muy útil.

 Muchas gracias y saludos.

 Fernando Macedo

 El 24/02/15 a las 10:51, Jorge I Velez escribió:

  Fernando,

  Podrias intentar

  R a - rep('a', 5)
 R b - rep('b', 5)
 R a
 [1] a a a a a
 R b
 [1] b b b b b
 R c(rbind(a, b))
   [1] a b a b a b a b a b

  Saludos,
 Jorge.-


 2015-02-24 23:49 GMT+11:00 Fernando Macedo ferm...@gmail.com:

   Buenas a todos.
  Relato el problema:
 
  - tengo un archivo de 316 columnas por 562000 filas (aprox.).
  - esas 316 columnas representan 158 sujetos, o sea dos columnas por cada
  individuo conteniendo información que debe ser condensada en una sola.
 
  Lo que necesito es ir tomando las dos columnas de cada individuo e
  intercalar los elementos de los vectores formando uno solo.
 
  Ejemplificando sería algo así:
 
   a
  [1] a a a a a
   b
  [1] b b b b b
   c
   [1] a b a b a b a b a b
 
 
  Estoy haciendo con un loop for pero es realmente muy lento. He buscado
 por
  algún paquete que ya lo haga directamente pero no he tenido mucho
 éxito. Me
  imagino que con sapply o apply pueda ser mucho más efectivo pero me ha
  resultado complicado para entender la sintaxis de estas funciones cuando
  involucra más de un objeto (vector, matriz, etc...).
 
  Desde ya agradezco las sugerencias que puedan verter sobre este
 problema.
 
  --
  Fernando Macedo
 
  [[alternative HTML version deleted]]
 
  ___
  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




 --
 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

Re: [R-es] leer ficheros excel en R en Ubuntu

[Fernando Macedo]

Yo tuve bastantes problemas con java y Excel, aunque los mayores, si mal no
recuerdo, eran con xlsx. Intenté de todo y no tuve mucha suerte.  Así que
me arme una función usando system y xlsx2csv.
Básicamente lo que hago es pasar un path y numero de hoja como argumentos,
y la función ser copia elxlsx a un directorio temporal lo convierte en txt
usando el xlsx2csv y lo levanta con read.table.
Entiendo que no es lo que buscas pues no usa herramientas exclusivas de R,
pero fue la solución que encontré.
Xlsx2csv es un programita escrito en python si no me equivoco,  de repente
se puede portar como paquete para R.
Saludos y aunque no te lo solucione espero que pueda servir de ayuda.

Fernando

El 15/08/2014 05:26, Miguel Fiandor Gutiérrez 
miguel.fiandor.gutier...@gmail.com escribió:

 Hola,

 @javier, me gustaría no tener que hacer nada de forma manual, ni por fuera
 de r, rstudio. Es decir, el típico comando de linux que me convierta de
xls
 a csv prefiero no usarlo. Me gustaría hacerlo todo desde R.

 @jorge -

 Con RODBC me salta -

 Error: could not find function odbcConnectExcel

 Lo que creo que es inevitable en Ubuntu
 
http://stackoverflow.com/questions/3426523/odbcconnectexcel-function-from-rodbc-package-for-r-not-found-on-ubuntu

 Con gdata -

 Unable to open file

'/home/miguelfg/R/x86_64-pc-linux-gnu-library/3.1/gdata/xls/madrid.xls'.Error
 in xls2sep(xls, sheet, verbose = verbose, ..., method = method,  :
   Intermediate file '/tmp/RtmpHRuknw/filefed757fcc67.csv' missing!In
 addition: Warning message:running command ''/usr/bin/perl'

 Con XLConnect -

 Error : package ‘rJava’ was built before R 3.0.0: please re-install
 itERROR: lazy loading failed for package ‘XLConnectJars’* removing
 ‘/home/miguelfg/R/x86_64-pc-linux-gnu-library/3.1/XLConnectJars’Warning
 in install.packages :
   installation of package ‘XLConnectJars’ had non-zero exit
 statusERROR: dependency ‘XLConnectJars’ is not available for package
 ‘XLConnect’* removing
 ‘/home/miguelfg/R/x86_64-pc-linux-gnu-library/3.1/XLConnect’Warning in
 install.packages :
   installation of package ‘XLConnect’ had non-zero exit status

 Con xlsReadWrite - me dice que no está disponible para R 3.1.1 Con xlsx
-

 Error : package ‘rJava’ was built before R 3.0.0: please re-install
 itERROR: lazy loading failed for package ‘xlsxjars’* removing
 ‘/home/miguelfg/R/x86_64-pc-linux-gnu-library/3.1/xlsxjars’Warning in
 install.packages :
   installation of package ‘xlsxjars’ had non-zero exit statusERROR:
 dependency ‘xlsxjars’ is not available for package ‘xlsx’* removing
 ‘/home/miguelfg/R/x86_64-pc-linux-gnu-library/3.1/xlsx’Warning in
 install.packages :
   installation of package ‘xlsx’ had non-zero exit status

 = Viendo que el problema parecía java +
 rJava, busqué y ejecuté - sudo R CMD javareconf -e Pero parece que no
 termina bien - conftest.c:1:17: fatal error: jni.h: No such file or
 directory compilation terminated. make: *** [conftest.o] Error 1 Unable to
 compile a JNI program


 El 15 de agosto de 2014, 2:23, Jorge I Velez jorgeivanve...@gmail.com
 escribió:

  Hola Miguel,
 
  A que te refieres con y nada?  Obtienes algun error?  Algun mensaje?
   Has probado con scan() y/o readLines()?
 
  Saludos,
  Jorge.-
 
 
 
  2014-08-15 7:38 GMT+10:00 Miguel Fiandor Gutiérrez 
  miguel.fiandor.gutier...@gmail.com:
 
  Hola,
 
  Pensé que esto iba a ser trivial en R, pero me estoy encontrado muchos
con
  mi problema en internet, y que las soluciones ofrecidas no terminan de
  funcionar.
 
  Estoy intentando leer un fichero .xls en ubuntu con los siguientes
  paquetes
  y nada:
 
  require(RODBC)
  conn = odbcConnectExcel(madrid.xls) # open a connection to the Excel
  file
  sqlTables(conn)$TABLE_NAME # show all sheets
  df = sqlFetch(conn, Sheet1) # read a sheet
  df = sqlQuery(conn, select * from [Sheet1 $]) # read a sheet
  (alternative
  SQL sintax)
  close(conn) # close the connection to the file
 
  require(gdata)
  xlsfile - file.path(path.package('gdata'),'xls','madrid.xls')
  df = read.xls (xlsfile)
  df = read.xls (xlsfile, sheet = 1, header = TRUE)
  df = read.xls (madrid.xls, sheet = 1, header = TRUE)
  df = read.xls (madrid.xls)
 
  require(xlsx)
  read.xlsx(madrid.xls, sheetName = Sheet1)
 
  library(XLConnect)
  wk = loadWorkbook(madrid.xls)
  df = readWorksheet(wk, sheet=Sheet1)
 
  --
 
  también he probado directamente read.table ya que el fichero es tipo
xml
  por dentro:
  df = read.table(madrid.xls, header = TRUE)
 
 
  -- ejemplo del fichero:
  $ head -c 500 madrid.xls
  table border=1trth bgcolor=#FFB18CNombre de la
  instalacion/thth bgcolor=#FFB18CMunicipio de la
instalacion/thth
  bgcolor=#FFB18CProvincia de la instalacion/thth
  bgcolor=#FFB18CClave del registro/thth bgcolor=#FFB18CCodigo
  registro autonomico definitivo/thth bgcolor=#FFB18CPotencia
nominal
  de la fase (kW)/thth bgcolor=#FFB18CGrupo Normativo/thth
  bgcolor=#FFB18CTipo de Inscripcion/th/trtrtdPERGOLA
  FOTOVOLTAICA
  JARDINES 

[R-es] Markdown temas

[Fernando Macedo]

Buenas a todos.
Estoy tratando de armar un pequeño informe para probar Markdown y ver 
que tal me cae para incorporarlo a mis actividades.
Se encuentra mucha información sobre la sintaxis y realmente es muy 
fácil de manejar y, según ejemplos que vi, los resultados son lo 
suficientemente buenos como para lo que busco.
El problema es que usando RStudio, y tratando de armar un .doc me quedan 
los títulos con un color azul bastante feote.
Me tiré a buscar como controlar estilo de letra principalmente pero por 
lo que entendí no se puede cambiar, o sea, existe un tema principal y 
luego pierdes la opción de aplicar determinado estilo de letra a una 
oración en particular.

No sería un problema si el tema fuese lindo pero no es el caso.

Así que mis dudas:

- ¿No se puede cambiar puntualmente el tipo de letra en una oración?

- En caso de que no y para RStudio, ¿dónde se pueden obtener temas?. No 
pregunto dónde porque en la ayuda de RStudio encontré dónde guardarlos, 
lo que se me dificultó fue encontrarlos.


Info de sesión:

R version 3.1.1 (2014-07-10) -- Sock it to Me
Copyright (C) 2014 The R Foundation for Statistical Computing
Platform: x86_64-pc-linux-gnu (64-bit) (Ubuntu 14.04)

RStudio Version 0.98.953


Eso es todo, muchas gracias de ante mano.

Saludos

Fernando Macedo

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

Re: [R-es] Markdown temas

[Fernando Macedo]

Gracias estimado, es más o menos como me parecía entonces.
Creo que puede resultar interesante pero habrá que armarse un tema o 
encontrar alguno, sino formatearlo luego de hecho que me parece más 
complejo para informes más largos.


Una lástima porque es muy interesante.

Probé con un editor que se llama haroopad que esta muy bueno pero no me 
fije si soporta inclusión de código R. Voy a buscar por el lado de otros 
editores capaz que anda mejor.


Saludos y gracias por su respuesta

Fernando

El 30/07/14 a las #4, palazon escribió:


El 30/07/14 a las #4, Fernando Macedo escribió:

Buenas a todos.
Estoy tratando de armar un pequeño informe para probar Markdown y ver 
que tal me cae para incorporarlo a mis actividades.
Se encuentra mucha información sobre la sintaxis y realmente es muy 
fácil de manejar y, según ejemplos que vi, los resultados son lo 
suficientemente buenos como para lo que busco.
El problema es que usando RStudio, y tratando de armar un .doc me 
quedan los títulos con un color azul bastante feote.
Efectivamente, ese es un template o plantilla por defecto. He buscado 
plantillas de calidad, pero no las he entrado :-( claro que como 
habitualmente uso latex ;-) no me he molestado mucho.Me tiré a buscar 
como controlar estilo de letra principalmente pero por lo que entendí 
no se puede cambiar, o sea, existe un tema principal y luego pierdes 
la opción de aplicar determinado estilo de letra a una oración en 
particular.
Precisamente la idea es simplificar, pero puedes controlar los tipos 
esenciales.

Un buen ejemplo de uso de markdown puedes verlo en https://stackedit.io/


No sería un problema si el tema fuese lindo pero no es el caso.
Piensa que guardando el fichero en formato html, con el css que te 
guste, puedes llevarlo al editor.

Mas info: http://rmarkdown.rstudio.com/html_document_format.html


Así que mis dudas:

- ¿No se puede cambiar puntualmente el tipo de letra en una oración?

Si por ejemplo _este es un ejemplo de frase en cursiva_. Este otro 
_**En cursiva y negrita**_.


- En caso de que no y para RStudio, ¿dónde se pueden obtener temas?. 
No pregunto dónde porque en la ayuda de RStudio encontré dónde 
guardarlos, lo que se me dificultó fue encontrarlos.


Espero serte de ayuda.





Info de sesión:

R version 3.1.1 (2014-07-10) -- Sock it to Me
Copyright (C) 2014 The R Foundation for Statistical Computing
Platform: x86_64-pc-linux-gnu (64-bit) (Ubuntu 14.04)

RStudio Version 0.98.953


Eso es todo, muchas gracias de ante mano.

Saludos

Fernando Macedo

___
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