[R] Write table with data in other .csv template

[Jeff Newmiller]

Thanks for posting dput data, but I don't understand your question.

are you familiar with cbind?
Is there duplication of column names in your input table and template? Are they always duplicated in the template? What characteristics of the template are you trying to preserve? Column order?

Other:
Don't post HTML email.
The name "table" is defined in the base package, so using it as a data name can lead to confusion and inability to perform fundamental operations.
---------------------------------------------------------------------------
Jeff Newmiller                        The     .....       .....  Go Live...
DCN:<jdnewmil at dcn.davis.ca.us>        Basics: ##.#.       ##.#.  Live Go...
                                      Live:   OO#.. Dead: OO#..  Playing
Research Engineer (Solar/Batteries            O.O#.       #.O#.  with
/Software/Embedded Controllers)               .OO#.       .OO#.  rocks...1k
--------------------------------------------------------------------------- 
Sent from my phone. Please excuse my brevity.

"s.s.m. fauzi" <ssmfone at gmail.com> wrote:

>Hi,
>
>I have a table with data, as below:
>
>dput(table):
>
>structure(list(Adrian.Cole = c(0L, 0L, 0L, 0L, 0L, 0L), Alison.Wong =
>c(0L, 0L, 0L, 0L, 0L, 0L), Andrei.Savu = c(0L, 0L, 0L, 0L, 0L, 0L),
>Bruno.Dumon = c(0L, 0L, 0L, 0L, 0L, 0L), Edward.J..Yoon = c(0L, 0L, 0L,
>0L, 0L, 0L), Eugene.Koontz = c(0L, 0L, 0L, 0L, 0L,
>    0L), Jakob.Homan = c(0L, 0L, 0L, 0L, 0L, 0L), Kelvin.Kakugawa =
>c(0L, 0L, 0L, 0L, 0L, 0L), Kirk.True = c(0L, 0L, 0L, 0L, 0L, 0L
>  ), Lars.George = c(0L, 0L, 1L, 0L, 0L, 0L), Soren.Macbeth = c(0L, 0L,
>1L, 0L, 0L, 0L), Stu.Hood = c(0L, 0L, 0L, 0L, 0L, 0L),
>  Tibor.Kiss = c(0L, 0L, 0L, 0L, 0L, 0L), Tom.White = c(0L, 0L, 1L, 0L,
>0L, 0L), Unassigned = c(0L, 0L, 0L, 0L, 0L, 0L
>    )), .Names = c("Adrian.Cole", "Alison.Wong",
>"Andrei.Savu", "Bruno.Dumon", "Edward.J..Yoon", "Eugene.Koontz",
>"Jakob.Homan",
>"Kelvin.Kakugawa", "Kirk.True", "Lars.George", "Soren.Macbeth",
>"Stu.Hood",
>"Tibor.Kiss", "Tom.White", "Unassigned"), row.names = c("Adrian Cole",
>"Alison Wong", "Andrei Savu", "Bruno Dumon", "Edward J. Yoon", "Eugene
>Koontz"), class = "data.frame")
>
>> dim(table)
>[1] 15 15
>> names(table)
>[1] "Adrian.Cole"     "Alison.Wong"     "Andrei.Savu"     "Bruno.Dumon"
>"Edward.J..Yoon"  "Eugene.Koontz"   "Jakob.Homan"     "Kelvin.Kakugawa"
> [9] "Kirk.True"       "Lars.George"     "Soren.Macbeth"   "Stu.Hood"
> "Tibor.Kiss"      "Tom.White"       "Unassigned"
>
>What I want to do is to embed/write this table to other big .csv
>template,
>and save it with other name.
>
>dput(template)
>
>structure(list(Adrian.Cole = c(0L, 0L, 0L, 0L, 0L, 0L), Alison.Wong =
>c(0L, 0L, 0L, 0L, 0L, 0L), Andrei.Savu = c(0L, 0L, 0L, 0L, 0L, 0L),
>Bruno.Dumon = c(0L, 0L, 0L, 0L, 0L, 0L), Edward.J..Yoon = c(0L, 0L, 0L,
>0L, 0L, 0L), Eugene.Koontz = c(0L, 0L, 0L, 0L, 0L,
>    0L), Jakob.Homan = c(0L, 0L, 0L, 0L, 0L, 0L), Kelvin.Kakugawa =
>c(0L, 0L, 0L, 0L, 0L, 0L), Kirk.True = c(0L, 0L, 0L, 0L, 0L, 0L
>  ), Lars.George = c(0L, 0L, 0L, 0L, 0L, 0L), Soren.Macbeth = c(0L, 0L,
>0L, 0L, 0L, 0L), Stu.Hood = c(0L, 0L, 0L, 0L, 0L, 0L),
>  Tibor.Kiss = c(0L, 0L, 0L, 0L, 0L, 0L), Tom.White = c(0L, 0L, 0L, 0L,
>0L, 0L), Unassigned = c(0L, 0L, 0L, 0L, 0L, 0L
>   ), David.Alves = c(0L, 0L, 0L, 0L, 0L, 0L), Patrick.Hunt = c(0L, 0L,
>0L, 0L, 0L, 0L), Sebastian.Schoenherr = c(0L, 0L, 0L,
>0L, 0L, 0L), Roman.Valls = c(0L, 0L, 0L, 0L, 0L, 0L), Pavel.Yaskevich =
>c(0L, 0L, 0L, 0L, 0L, 0L), Karel.Vervaeke = c(0L, 0L, 0L, 0L, 0L,
>  0L), Shay.Banon = c(0L, 0L, 0L, 0L, 0L, 0L), Hyunsik.Choi = c(0L, 0L,
>0L, 0L, 0L, 0L), Joey.Hung. = c(0L, 0L, 0L, 0L, 0L, 0L
>   ), Tommaso.Teofili = c(0L, 0L, 0L, 0L, 0L, 0L), Jeff.Hammerbacher. =
>c(0L, 0L, 0L, 0L, 0L, 0L), Andrew.Purtell. = c(0L, 0L, 0L, 0L,
>0L, 0L), Johan.Oskarsson = c(0L, 0L, 0L, 0L, 0L, 0L), Erik.Frey = c(0L,
>0L, 0L, 0L, 0L, 0L), Sebb = c(0L, 0L, 0L, 0L, 0L, 0L), Andrew.klochkov
>=
>c(0L,
>   0L, 0L, 0L, 0L, 0L), Paul.Egan = c(0L, 0L, 0L, 0L, 0L, 0L), Hudson =
>c(0L, 0L, 0L, 0L, 0L, 0L), Hadoop = c(0L, 0L,
>  0L, 0L, 0L, 0L), Aaron = c(0L, 0L, 0L, 0L, 0L, 0L), henry = c(0L, 0L,
>0L, 0L, 0L, 0L), steve = c(0L, 0L, 0L, 0L, 0L, 0L), russel = c(0L,
>    0L, 0L, 0L, 0L, 0L)), .Names = c("Adrian.Cole",
>"Alison.Wong", "Andrei.Savu", "Bruno.Dumon", "Edward.J..Yoon",
>"Eugene.Koontz",
>"Jakob.Homan", "Kelvin.Kakugawa", "Kirk.True", "Lars.George",
>"Soren.Macbeth",
>"Stu.Hood", "Tibor.Kiss", "Tom.White", "Unassigned",
>"David.Alves", "Patrick.Hunt", "Sebastian.Schoenherr",
>"Roman.Valls", "Pavel.Yaskevich", "Karel.Vervaeke", "Shay.Banon",
>"Hyunsik.Choi",
>"Joey.Hung.", "Tommaso.Teofili", "Jeff.Hammerbacher.",
>"Andrew.Purtell.", "Johan.Oskarsson", "Erik.Frey", "Sebb",
>"Andrew.klochkov", "Paul.Egan",
>"Hudson", "Hadoop", "Aaron", "henry", "steve", "russel"), row.names =
>c("Adrian Cole", "Alison Wong", "Andrei Savu", "Bruno Dumon", "Edward
>J.
>Yoon",
>"Eugene Koontz"), class = "data.frame")
>
>> dim(template)
>[1] 38 38
>> names(template)
> [1] "Adrian.Cole"          "Alison.Wong"          "Andrei.Savu"
> "Bruno.Dumon"
> [5] "Edward.J..Yoon"       "Eugene.Koontz"        "Jakob.Homan"
> "Kelvin.Kakugawa"
> [9] "Kirk.True"            "Lars.George"          "Soren.Macbeth"
> "Stu.Hood"
>[13] "Tibor.Kiss"           "Tom.White"            "Unassigned"
>"David.Alves"
>[17] "Patrick.Hunt"         "Sebastian.Schoenherr" "Roman.Valls"
> "Pavel.Yaskevich"
>[21] "Karel.Vervaeke"       "Shay.Banon"           "Hyunsik.Choi"
>"Joey.Hung."
>[25] "Tommaso.Teofili"      "Jeff.Hammerbacher."   "Andrew.Purtell."
> "Johan.Oskarsson"
>[29] "Erik.Frey"            "Sebb"                 "Andrew.klochkov"
> "Paul.Egan"
>[33] "Hudson"               "Hadoop"               "Aaron"
> "henry"
>[37] "steve"                "russel"
>
>	[[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.