thanks dear. method 2 worked very fast since my data is very big.
Thanks a lot. :-)
Best,Farnoosh Sheikhi
________________________________
Cc: R help <r-help@r-project.org>
Sent: Monday, November 12, 2012 6:15 PM
Subject: Re: for loop
HI,
You can do this in many ways:
dat1<-read.table(text="
med1,med2,med3
1,0,1
0,1,1
2,0,0
",sep=",",header=TRUE)
#1st method
library(reshape)
dat2<-melt(dat1)
dat3<-aggregate(dat2$value,by=list(dat2$variable),sum)
colnames(dat3)<-c("name","sum(n11)")
dat3
# name sum(n11)
#1 med1 3
#2 med2 1
#3 med3 2
#2nd method
res<-data.frame(colSums(dat1))
names(res)<-"sum(n11)"
res
# sum(n11)
#med1 3
#med2 1
#med3 2
#3rd method
do.call(rbind,lapply(dat1,sum))
# [,1]
#med1 3
#med2 1
#med3 2
A.K.
________________________________
Sent: Monday, November 12, 2012 7:24 PM
Subject: for loop
Hi there,
I want to calculate the odds ratio for a data like below.
I want to compute the sum of each column as a new column and variable names as
a new column.
I have about 1000 variables and I think I need to write a loop.
med1 med2 med3
1 01
011
200
The final data will look like:
name sum(n11)
med1 3
med2 1
med3 2
Thanks a lot :-).
Best,Farnoosh Sheikhi
[[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.
