Re: [R] if clause in data frame

2013-03-29 Thread arun
HI, I am not sure I understand it correctly. Should this (m1*x1/m1) +n1*y1/n1) /(m1+n1) be (x1+y1)/(m1+n1)? final<-data.frame()    for (m1 in 4:10) {    for (n1 in 4:10){     for (x1 in 0: m1) {   for (y1 in 0: n1) { final<- rbind(final,c(m1,n1,x1,y1)) colnames(fi

Re: [R] if clause in data frame

2013-03-29 Thread David Winsemius
4:46 PM > Subject: Re: [R] if clause in data frame > > > On Mar 29, 2013, at 10:47 AM, arun wrote: > >> Hi, >> >> >> final<-data.frame() >> for (m1 in 4:10) { >> for (n1 in 4:10){ >> for (x1 in 0: m1)

Re: [R] if clause in data frame

2013-03-29 Thread arun
Yes, that is better. I just copied the same function that the OP used. A.K. From: David Winsemius To: arun Cc: Joanna Zhang ; R help Sent: Friday, March 29, 2013 4:46 PM Subject: Re: [R] if clause in data frame On Mar 29, 2013, at 10:47 AM, arun

Re: [R] if clause in data frame

2013-03-29 Thread David Winsemius
On Mar 29, 2013, at 10:47 AM, arun wrote: > Hi, > > > final<-data.frame() >for (m1 in 4:10) { >for (n1 in 4:10){ >for (x1 in 0: m1) { > for (y1 in 0: n1) { > > final<- rbind(final,c(m1,n1,x1,y1)) > res > final1<-within(final,{flag<-ifelse(x1/m1>y1/n

Re: [R] if clause in data frame

2013-03-29 Thread arun
Forgot: colnames(final)<- c("m1","n1","x1","y1") before; final1<-within(final,{flag<-ifelse(x1/m1>y1/n1, 1,0)}) - Original Message - From: arun To: Joanna Zhang Cc: R help Sent: Friday, March 29, 2013 1:47 PM Subject: Re: if clause in data frame Hi, final<-data.frame()    for (m1

Re: [R] if clause in data frame

2013-03-29 Thread arun
Hi, final<-data.frame()    for (m1 in 4:10) {    for (n1 in 4:10){     for (x1 in 0: m1) {   for (y1 in 0: n1) { final<- rbind(final,c(m1,n1,x1,y1)) res  final1<-within(final,{flag<-ifelse(x1/m1>y1/n1, 1,0)})  head(final1) #  m1 n1 x1 y1 flag #1  4  4  0  0    0 #2