Notice what happens in your 'ifelse': any row that does not meet the condition is changed to "B"; that is probably not what you were expecting. You probably want:
data$SOCIAL_STATUS<-ifelse(data$SOCIAL_STATUS=="B" & data$MALE>4, "C", data$SOCIAL_STATUS) so you leave the others unchanged. On Tue, Jun 23, 2009 at 6:32 PM, Mark Na <mtb...@gmail.com> wrote: > Hi R-helpers, > > I am trying to use this ifelse statement to recode a variable: > > data$SOCIAL_STATUS<-ifelse(data$SOCIAL_STATUS=="B" & data$MALE>4, "C", > "B") > > (i.e., if social status is B and there are more than 4 males, then > recode social status to C; otherwise, leave it B) > > But, it's not working. See the below R output. Notice that there were > 71 "B" observations before the re-code but 2098 "B" observations after > the re-code. The only thing my code should do is REDUCE the number of > "B" observations, not increase them. > > Can anyone see what I'm doing wrong? Thanks! > > Thanks, Mark Na > > > > str(data) > 'data.frame': 2100 obs. of 13 variables: > $ DATE :Class 'Date' num [1:2100] 14399 14399 14399 14399 14399 > ... > $ OBS : Factor w/ 7 levels "AJG","LEB","MB",..: 3 3 3 3 3 > 3 3 3 3 3 ... > $ POND_ID : Factor w/ 118 levels "1","10","100",..: 86 86 86 > 86 86 86 86 86 86 86 ... > $ STATUS : num 1 1 1 1 1 1 1 1 1 1 ... > $ SPECIES : Factor w/ 25 levels "AGWT","AMAV",..: 16 16 12 12 > 4 7 7 7 7 3 ... > $ SOCIAL_STATUS : Factor w/ 9 levels "","A","B","D",..: 5 2 5 2 5 5 > 5 5 2 8 ... > $ COUNT_OF_GROUPS: num 1 1 1 1 1 3 3 3 1 2 ... > $ MALE : num 1 1 1 1 1 1 1 1 1 0 ... > $ FEMALE : num 1 0 1 0 1 1 1 1 0 0 ... > $ NOSEX : num 0 0 0 0 0 0 0 0 0 2 ... > $ UPLAND : num 0 0 0 0 0 0 0 0 0 0 ... > $ TAG : num 0 0 0 0 0 0 0 0 0 0 ... > $ COMMENT : chr "" "" "" "" ... > > > > length(which(data$SOCIAL_STATUS=="B")) > [1] 71 > > > data$SOCIAL_STATUS<-ifelse(data$SOCIAL_STATUS=="B" & data$MALE>4, "C", > "B") > > > length(which(data$SOCIAL_STATUS=="B")) > [1] 2098 > > ______________________________________________ > 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<http://www.r-project.org/posting-guide.html> > and provide commented, minimal, self-contained, reproducible code. > -- Jim Holtman Cincinnati, OH +1 513 646 9390 What is the problem that you are trying to solve? [[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.
