mapping data from table to .csv template
Hi
your data are difficult to read so I make my own
set.seed(111)
sender<-sample(letters[1:5], 20, replace=T)
receiver<-sample(letters[1:5], 20, replace=T)
xtabs(~sender+receiver)
receiver
sender a b c d e
a 1 1 3 1 0
b 0 1 0 1 1
c 1 3 2 2 0
d 0 1 0 0 1
e 0 0 0 1 0
If you want such result from each subject of your table }presumably data.frame just split and lapply it
untested
lapply(split(your.data, by a column), function (x) xtabs(~x$sender+x$receiver))
Regards
Petr
-----Original Message-----
From: r-help-bounces at r-project.org [mailto:r-help-bounces at r-
project.org] On Behalf Of s.s.m. fauzi
Sent: Tuesday, September 25, 2012 4:06 AM
To: r-help at r-project.org
Subject: [R] mapping data from table to .csv template
I have a .csv table named mailing.csv as below. It consist a receiver,
subject and sender.
Receiver subject sender
1 Adrian Cole RE: [WHIRR-117] Composable services Tom White
2 Adrian Cole RE: [WHIRR-117] Composable services Tom White
3 Adrian Cole RE: [WHIRR-117] Composable services Adrian Cole
4 Adrian Cole RE: [WHIRR-117] Composable services Adrian Cole
5 Adrian Cole RE: [WHIRR-117] Composable services Tom White
6 Adrian Cole RE: [WHIRR-117] Composable services Adrian Cole
7 Adrian Cole RE: [WHIRR-117] Composable services Tom White
8 Adrian Cole RE: [WHIRR-117] Composable services Tom White
9 Adrian Cole RE: [WHIRR-117] Composable services Adrian Cole
10 Adrian Cole RE: [WHIRR-117] Composable services Adrian Cole
11 Adrian Cole RE: [WHIRR-117] Composable services Tom White
12 Adrian Cole RE: [WHIRR-117] Composable services Tom White
13 Adrian Cole RE: [WHIRR-117] Composable services Tom White
14 Adrian Cole RE: [WHIRR-117] Composable services Tom White
15 Patrick Hunt RE: [WHIRR-123] Cassandra integration Tom White
16 Patrick Hunt RE: [WHIRR-123] Cassandra integration Andrei Savu
17 Patrick Hunt RE: [WHIRR-123] Cassandra integration Andrei Savu
18 Patrick Hunt RE: [WHIRR-123] Cassandra integration Tom White
19 Patrick Hunt RE: [WHIRR-123] Cassandra integration Tom White
20 Patrick Hunt RE: [WHIRR-123] Cassandra integration Adrian Cole
21 Patrick Hunt RE: [WHIRR-123] Cassandra integration Tom White22
Patrick Hunt RE: [WHIRR-123] Cassandra integration Patrick Hunt
What I would like to do is to update/map the information from table
above to .csv template (namedAC_template.csv), and save it in a
separate file using subject details in backet as file name (for
instance AC_WHIRR-117). As for table above, it should create two new
files name as AC_WHIRR-117and AC_WHIRR-123.
sample .csv template (AC_template.csv) is as below:
Adrian.Cole Patrick.Hunt Andrei.Savu Bruno.Dumon
Edward.J..Yoon Eugene.Koontz Jakob.Homan Kelvin.Kakugawa Tom.White
Adrian Cole 0 0 0 0
0 0 0 0 0
Patrick Hunt 0 0 0 0
0 0 0 0 0
Andrei Savu 0 0 0 0
0 0 0 0 0
Bruno Dumon 0 0 0 0
0 0 0 0 0
Edward J. Yoon 0 0 0 0
0 0 0 0 0
Eugene Koontz 0 0 0 0
0 0 0 0 0
Jakob Homan 0 0 0 0
0 0 0 0 0
Kelvin Kakugawa 0 0 0 0
0 0 0 0 0
Tom White 0 0 0 0
0 0 0 0 0
Lars George 0 0 0 0
0 0 0 0 0
Soren Macbeth 0 0 0 0
0 0 0 0 0
Lars.George Soren.Macbeth
Adrian Cole 0 0
Patrick Hunt 0 0
Andrei Savu 0 0
Bruno Dumon 0 0
Edward J. Yoon 0 0
Eugene Koontz 0 0
Jakob Homan 0 0
Kelvin Kakugawa 0 0
Tom White 0 0
Lars George 0 0
Soren Macbeth 0 0
Sample output for this question is as below:
sample output for AC_WHIRR-117:
Adrian.Cole Patrick.Hunt Andrei.Savu Bruno.Dumon
Edward.J..Yoon Eugene.Koontz Jakob.Homan Kelvin.Kakugawa Tom.White
Adrian Cole 0 0 0 0
0 0 0 0 9
Patrick Hunt 0 0 0 0
0 0 0 0 0
Andrei Savu 0 0 0 0
0 0 0 0 0
Bruno Dumon 0 0 0 0
0 0 0 0 0
Edward J. Yoon 0 0 0 0
0 0 0 0 0
Eugene Koontz 0 0 0 0
0 0 0 0 0
Jakob Homan 0 0 0 0
0 0 0 0 0
Kelvin Kakugawa 0 0 0 0
0 0 0 0 0
Tom White 9 0 0 0
0 0 0 0 0
Lars George 0 0 0 0
0 0 0 0 0
Soren Macbeth 0 0 0 0
0 0 0 0 0
Lars.George Soren.Macbeth
Adrian Cole 0 0
Patrick Hunt 0 0
Andrei Savu 0 0
Bruno Dumon 0 0
Edward J. Yoon 0 0
Eugene Koontz 0 0
Jakob Homan 0 0
Kelvin Kakugawa 0 0
Tom White 0 0
Lars George 0 0
Soren Macbeth 0 0
Sample output for AC_WHIRR-123
Adrian.Cole Patrick.Hunt Andrei.Savu Bruno.Dumon
Edward.J..Yoon Eugene.Koontz Jakob.Homan Kelvin.Kakugawa Tom.White
Adrian Cole 0 1 0 0
0 0 0 0 0
Patrick Hunt 1 0 2 0
0 0 0 0 4
Andrei Savu 0 2 0 0
0 0 0 0 0
Bruno Dumon 0 0 0 0
0 0 0 0 0
Edward J. Yoon 0 0 0 0
0 0 0 0 0
Eugene Koontz 0 0 0 0
0 0 0 0 0
Jakob Homan 0 0 0 0
0 0 0 0 0
Kelvin Kakugawa 0 0 0 0
0 0 0 0 0
Tom White 0 4 0 0
0 0 0 0 0
Lars George 0 0 0 0
0 0 0 0 0
Soren Macbeth 0 0 0 0
0 0 0 0 0
Lars.George Soren.Macbeth
Adrian Cole 0 0
Patrick Hunt 0 0
Andrei Savu 0 0
Bruno Dumon 0 0
Edward J. Yoon 0 0
Eugene Koontz 0 0
Jakob Homan 0 0
Kelvin Kakugawa 0 0
Tom White 0 0
Lars George 0 0
Soren Macbeth 0 0
Appreciate help from the expert...
[[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.