[R] HELP to cbind several data.frame with a LOOP

[jim holtman]

I would use 'lapply' to create a list of the matrices:

result <- lapply(c(10,20,30,40,50), function(.num){
    do.call(cbind, lapply(c('Tableanalysis_firenze',
'Tableanalysis_siena', 'Tableanalysis_lucca'), function(.file){
        read.table(sprintf("%s_%d.txt", .file, .num), header=TRUE)
    }))
})



On Thu, Apr 9, 2009 at 10:49 AM, Alessandro
<alessandro.montaghi at unifi.it> wrote:
> Dear R users,
>
>
>
> thank for help. SORRY I am seeing in google a maillist but I didn't find a
> solution for my problem
>
>
>
> I have several txt file (with the same number of column and HEADER) to merge
> together, this is an example:
>
>
>
> Tableanalysis_firenze_10.txt
>
> Tableanalysis_firenze_20.txt
>
> Tableanalysis_firenze_30.txt
>
> Tableanalysis_firenze_40.txt
>
> Tableanalysis_firenze_50.txt
>
> Tableanalysis_siena_10.txt
>
> Tableanalysis_siena_20.txt
>
> Tableanalysis_siena_30.txt
>
> Tableanalysis_siena_40.txt
>
> Tableanalysis_siena_50.txt
>
> Tableanalysis_lucca_10.txt
>
> Tableanalysis_lucca_20.txt
>
> Tableanalysis_lucca_30.txt
>
> Tableanalysis_lucca_40.txt
>
> Tableanalysis_lucca_50.txt
>
>
>
> I wish to combine a new txt file like this
>
>
>
> Tableanalysis_10 <- cbind(Tableanalysis_firenze_10, Tableanalysis_siena_10,
> Tableanalysis_lucca_10)
>
> Tableanalysis_20 <- cbind(Tableanalysis_firenze_20, Tableanalysis_siena_20,
> Tableanalysis_lucca_20)
>
> Tableanalysis_30 <- cbind(Tableanalysis_firenze_30, Tableanalysis_siena_30,
> Tableanalysis_lucca_30)
>
> Tableanalysis_40 <- cbind(Tableanalysis_firenze_40, Tableanalysis_siena_40,
> Tableanalysis_lucca_40)
>
> Tableanalysis_50 <- cbind(Tableanalysis_firenze_50, Tableanalysis_siena_50,
> Tableanalysis_lucca_50)
>
>
>
> Thanks
>
>
>
> Ale
>
>
>
>
>
>
>
>
>
>
>        [[alternative HTML version deleted]]
>
> ______________________________________________
> R-help at r-project.org mailing list
> https://stat.ethz.ch/mailman/listinfo/r-help
> PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
> and provide commented, minimal, self-contained, reproducible code.
>



-- 
Jim Holtman
Cincinnati, OH
+1 513 646 9390

What is the problem that you are trying to solve?