Displaying 8 results from an estimated 8 matches for "anio".
Did you mean:
aio
2014 Sep 11
2
separar un archivo por años en diferentes archivos
...exacto que utilizaste es el que has compartido, hay un error...
Te falta cerrar un corchete. Y he incluido un detalle para que los ficheros
tengan como nombre los años...
?#--------------------------?
??filename<-"test1.csv"
DBa<-read.csv(filename,sep="*;*" ,header=TRUE)
anios<-unique(DBa$Year)
for(i in 1:length(anios)) {
dattmp<-DBa[DBa$Year==anios[i],*]*
write.table(dattmp,file=paste(*anios[i]*,".txt",sep=""))
}
?#-----------------------------
Y cuidado, que a la hora de leer el fichero ".csv", el separador es ";" y
no...
2014 Sep 11
4
separar un archivo por años en diferentes archivos
Otra manera sería usar la función split. Que devuelve una lista de
data.frame.
Para expotar luego cada elemento puedes usar lapply, ejemplo:
data(iris)
lista<-split(iris,iris$Species)
lapply(names(lista),function(x) write.table(x = lista[[x]],file =
paste0(x,".txt")) )
Saludos
El 11 de septiembre de 2014, 14:44, Isidro Hidalgo <ihidalgo en jccm.es>
escribió:
> ¿En qué
2017 Jan 19
2
Error en loop anidado con data.table
Hola tengo una tabla de tipo data.frame "datos" con la siguiente
estructura, simplificada en número de niveles por variable, para crear un
ejemplo más sencillo:
id anio t_8a t_10a t_12a rankf8 rankf10 rankf12
1 1 100 220 220 NA NA NA
2 1 140 350 350 NA NA NA
3 2 55 165 165 NA NA NA
4 2 60 200 200 NA NA NA
5 2 100 NA NA NA NA NA
6 3 NA 350 350 NA NA NA
También tengo una matriz, "mat" con la siguiente estructura:
t_8a t_10a t_12a
1 100 200 200
2...
2014 Sep 08
3
problema con los cambios de marcas temporales en el eje X
...utilizando las fechas como si fuesen "strings".
Mira si esto es lo que buscabas...
#---------------------------
datIn <- read.csv("Libro1.csv", header=T, sep=";", dec=",")
library(lubridate)
datIn$mes <- month(dmy(datIn$fecha), label=T, abbr=T)
datIn$anio <- year(dmy(datIn$fecha))
xlabels <- paste(datIn$mes,"-",datIn$anio,sep="")
par(oma=c(4,2,1,1))
plot(datIn$xbar, axes=F, type="b", pch=19, ylim=c(400,650), xlab="", ylab="xbar")
axis(1,at=1:length(datIn$xbar), labels=xlabels,cex.lab=0.5, la...
2014 Sep 11
3
separar un archivo por años en diferentes archivos
Hola a todos,
Tengo un archivo que va desde el año 2002 hasta el 2010; lo que quiero
hacer es separar ese archivo por años.Crear un archivo para cada año,
alguien sabe como podria hacerlo?
Muchas gracias, un saludo
[[alternative HTML version deleted]]
2014 Sep 08
3
problema con los cambios de marcas temporales en el eje X
Hola de nuevo, acabo de encontrar la solución. He creado una variable ficticia con los días 1 de cada mes en la secuencia temporal que quería y después he actuado de la siguiente manera
attach(Libro1)
plot (xbar~as.Date(fecha,"%d/%m/%y"), type="b", pch=19,cex=2,xaxt="n")
xlabels<-strptime(ofeje, format = "%d/%m/%y")
axis.Date(1,
2019 Feb 12
4
Consulta Fecha R
Buenos días , por favor alguien me puede ayudar
necesito separar en tres columnas una columna fecha que viene en el
siguiente formato (01/01/1983)
Muchas gracias
Saludos
[[alternative HTML version deleted]]
2014 Sep 08
2
problema con los cambios de marcas temporales en el eje X
Muchas gracias Carlos, previo a mi correo, entre las pruebas que hice estaba una parecida a la que apuntas de la siguiente manera:
attach (Libro1)
plot (xbar~as.Date(fechas,"%d/%m/%y"), ylim=c(400,660), xaxt="n", type="b", pch=19,cex=1)
xlabels<-strptime(fecha,format="%d/%m/%Y")
axis.Date (1,at=xlabels,format="%b-%y")