Message-ID: <CAMn86NcMhNYNjoO28g6ibU1R+Ot9JegU7MOMEVn-uh0YdMRP6Q@mail.gmail.com>
Date: 2012-01-10T16:30:13Z
From: Sebastian Kruk
Subject: [R-es] unir en .dbf luego de aplicar read.xls a varios archivos
Estimados:
Tengo un directorio con varios archivos Excel quiero importarlos todos
y grabarlos en un único archivo .dbf.
Haciendolo uno por uno lo logro de la siguiente manera (solo tomo 2 archivos):
archivos <- list.files(pattern = 'xls')
a1 <- read.xls(archivos[1],
perl="C:\\strawberry\\perl\\bin\\perl.exe",skip=12,dec=",",header=F,as.is=T)
a2 <- read.xls(archivos[2],
perl="C:\\strawberry\\perl\\bin\\perl.exe",skip=12,dec=",",header=F,as.is=T)
a11 <- cbind(a1[1,1:2],a1[4:which(a1=="Art. 14")-1,1:7])
a21 <- cbind(a2[1,1:2],a1[4:which(a1=="Art. 14")-1,1:7])
a3 <- rbind(a11,a21)
Si lo hago con lapply me queda mal.
Saludos,
Sebastián.