Dear list,
I have following table
ee<-table(ID,Day)
ee
Day
ID 2 3 4 5 6 7 9 10 14 16
35 5 0 0 3 1 0 0 5 0 0
36 0 0 0 0 0 0 0 1 0 0
43 13 15 15 0 0 13 13 15 13 15
46 0 1 0 0 0 0 0 0 0 0
58 0 0 0 0 0 0 4 4 0 0
and want to calculate the sum for each row and column and then append the
sums to the table matrix.
kk<cbind(ee,as.matrix(apply(ee,1,sum)))
dd<-rbind(kk,apply(ee,2,sum))
Warning message:
number of columns of result
is not a multiple of vector length (arg 2) in: rbind(1, kk,
apply(ee,2, sum))
rownames(dd)<-c(rownames(dd)[-6],"Total:")
colnames(dd)<-c(colnames(dd)[-11],"Total:")
I got a table as wanted (see below), except that the variable names Day and
ID are missing. Is there a way to add back these variable names to the table
"dd" as shown in "ee". Also I got a warning message that I'm not exactly know
how to skip. Can I make the table "dd" in a different and easier way ? Any
suggestions are highly appreciated.
Thanks,
Tom
dd
2 3 4 5 6 7 9 10 14 16 Total:
35 5 0 0 3 1 0 0 5 0 0 14
36 0 0 0 0 0 0 0 1 0 0 1
43 13 15 15 0 0 13 13 15 13 15 112
46 0 1 0 0 0 0 0 0 0 0 1
58 0 0 0 0 0 0 4 4 0 0 8
Total: 18 16 15 3 1 13 17 25 13 15 18
---------------------------------
Går det långsamt? Skaffa dig en snabbare bredbandsuppkoppling.
[[alternative HTML version deleted]]
______________________________________________
R-help@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.
