Write table with data in other .csv template
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.