An embedded and charset-unspecified text was scrubbed... Name: no disponible URL: <https://stat.ethz.ch/pipermail/r-help-es/attachments/20120510/f71c8be4/attachment.pl>
[R-es] Vector de componentes idénticas
11 messages · Eva Prieto Castro, J. Pelayo izquierdo, Carlos J. Gil Bellosta +3 more
An embedded and charset-unspecified text was scrubbed... Name: no disponible URL: <https://stat.ethz.ch/pipermail/r-help-es/attachments/20120510/a167739f/attachment.pl>
An embedded and charset-unspecified text was scrubbed... Name: no disponible URL: <https://stat.ethz.ch/pipermail/r-help-es/attachments/20120510/8e3be450/attachment.pl>
Tienes esta otra alternativa que funcionarÃa (a diferencia de sd) con valores no numéricos. Y que es marginalmente más legible: a <- rep( 1, 10) all( a == a[1] ) Un saludo, Carlos J. Gil Bellosta http://www.datanalytics.com El dÃa 10 de mayo de 2012 13:15, Eva Prieto Castro <evapcastro en yahoo.es> escribió:
Gracias a los dos. Hay que ver, se me podÃa haber ocurrido... Un saludo Eva --- El jue, 10/5/12, J. Pelayo izquierdo <pelayo.i.g en gmail.com> escribió: De: J. Pelayo izquierdo <pelayo.i.g en gmail.com> Asunto: Re: [R-es] Vector de componentes idénticas Para: "Eva Prieto Castro" <evapcastro en yahoo.es> CC: r-help-es en r-project.org Fecha: jueves, 10 de mayo, 2012 13:01 Haz sd(vector) sà es cero no hay desviación son todos iguales Lo puedes hacer con summary(vector) también Un saludo, Pelayo El 10/05/2012 12:14, "Eva Prieto Castro" <evapcastro en yahoo.es> escribió: Hola: Por favor, ¿podéis indicarme el modo más sencillo de identificar si los elementos de un vector son todos iguales?. Se me ocurre verificar que length(unique(x)) sea igual a 1, pero no sé si hay alguna función más especÃfica. Gracias. Eva     [[alternative HTML version deleted]]
_______________________________________________ R-help-es mailing list R-help-es en r-project.org https://stat.ethz.ch/mailman/listinfo/r-help-es     [[alternative HTML version deleted]] _______________________________________________ R-help-es mailing list R-help-es en r-project.org https://stat.ethz.ch/mailman/listinfo/r-help-es
An embedded and charset-unspecified text was scrubbed... Name: no disponible URL: <https://stat.ethz.ch/pipermail/r-help-es/attachments/20120510/718076e9/attachment.pl>
An embedded and charset-unspecified text was scrubbed... Name: no disponible URL: <https://stat.ethz.ch/pipermail/r-help-es/attachments/20120510/08736ecb/attachment.pl>
An embedded and charset-unspecified text was scrubbed... Name: no disponible URL: <https://stat.ethz.ch/pipermail/r-help-es/attachments/20120510/9fa6002f/attachment.pl>
An embedded and charset-unspecified text was scrubbed... Name: no disponible URL: <https://stat.ethz.ch/pipermail/r-help-es/attachments/20120510/9aa12035/attachment.pl>
An embedded and charset-unspecified text was scrubbed... Name: no disponible URL: <https://stat.ethz.ch/pipermail/r-help-es/attachments/20120511/38bb073c/attachment.pl>
An embedded and charset-unspecified text was scrubbed... Name: no disponible URL: <https://stat.ethz.ch/pipermail/r-help-es/attachments/20120511/46a0f4aa/attachment.pl>
Estimada Eva Prieto Castro
Una idea, puede ser alocada y sin sentido, pero copio una parte de un código
en R, donde escribe unos resultados,
¿Que pasa si se adapta eso a sus necesidades? ¿Sera posible?
print.lact <- function(x, ...)
{
cat("\nLactation:", paste(x$id, x$parity, sep="-"), "\tID:", x$id,
"\t\tParity:", x$parity, "\n")
cat(paste("dtPart:", x$dtPart, "\tdtStart:", x$dtStart, "\tdtEnd:",
x$dtEnd, "\n\n"))
print(x$test, ...)
}
Javier Marcuzzi
-----Mensaje original-----
From: Eva Prieto Castro
Sent: Friday, May 11, 2012 6:48 AM
To: Carlos Ortega
Cc: r-help-es en r-project.org
Subject: Re: [R-es] Respuesta y consulta sobre formato columnas data.frame
Hola, Carlos:
Efectivamente cuando creÃa que el write.table me habÃa dado resultado, me di
cuenta de que algo no iba bien con las columnas... Todo por culpa de la
necesidad de dibujar una lÃnea separadora entre la fila correspondiente a
los nombres de las columnas y el resto de los datos.
Probaré tu alternativa y te cuento.
Muchas gracias.
Eva
--- El vie, 11/5/12, Carlos Ortega <cof en qualityexcellence.es> escribió:
De: Carlos Ortega <cof en qualityexcellence.es>
Asunto: Re: [R-es] Respuesta y consulta sobre formato columnas data.frame
Para: "Eva Prieto Castro" <evapcastro en yahoo.es>
CC: "Gregorio R. Serrano" <grserrano en ccee.ucm.es>, r-help-es en r-project.org
Fecha: viernes, 11 de mayo, 2012 09:51
Hola Eva,
Parece que la alternativa de write.table no está dando resultados.He probado
con algo muy sencillo pero veo que funciona perfectamente, quizás también
porque los datos ya están inicialmente formateados, pero vaya por probar una
alternativa nueva.
Este es el código:
#Datos del data.frameLines <- "DeployID Date.Time LocationQuality Latitude
Longitude
STM05-1 2005/02/28 17:35 Good -35.562 177.158
STM05-1 2005/02/28 19:44 Good -35.487 177.129
STM05-1 2005/02/28 23:01 Unknown -35.399 177.064
STM05-1 2005/03/01 07:28 Unknown -34.978 177.268
STM05-1 2005/03/01 18:06 Poor -34.799 177.027
STM05-1 2005/03/01 18:47 Poor -34.85 177.059
STM05-2 2005/02/28 12:49 Good -35.928 177.328
STM05-2 2005/02/28 21:23 Poor -35.926 177.314
"#Genero el data.frameDF <- read.table(textConnection(Lines), skip = 1,
as.is = TRUE, sep="\t", col.names = c("Id", "Date", "Time",
"Quality", "Lat", "Long"))
#Capturo la salida en el fichero "test.txt".capture.output(DF,
file="test.txt")
Saludos,Carlos Ortegawww.qualityexcellence.es
El 10 de mayo de 2012 23:25, Eva Prieto Castro <evapcastro en yahoo.es>
escribió:
Hola:
Gracias, Gregorio.
He probado lo del format a cada columna y luego utilizar cbind, pero tengo
el problema de que no consigo la justificación de los nombres de las
columnas, ya que yo al hacer el write.table no vuelco el dataframe completo,
sino que primero vuelco los nombres de las columnas, a continuación dibujo
una lÃnea separadora y luego vuelco los datos propiamente dichos. El
objetivo es volcar en fichero de texto...
¿Se te ocurre alguna idea para dar formato bajo este planteamiento?.
Un saludo.
Eva
--- El jue, 10/5/12, Gregorio R. Serrano <grserrano en ccee.ucm.es> escribió:
_______________________________________________
R-help-es mailing list
R-help-es en r-project.org
https://stat.ethz.ch/mailman/listinfo/r-help-es