Skip to content
Prev 170367 / 398503 Next

extracting parts of words or extraxting letter to use in ifelse-func.

Hello 

I want to make some variables with the ifelse-function, but i don't know how
to do it. 

I want to make these five variables; 

b2$PRRSvac <- ifelse(b2$status=='A' | b2$status=='Aa',1,0) 
b2$PRRSdk <- ifelse(b2$status=='B' | b2$status=='Bb',1,0) 
b2$sanVac <- ifelse(b2$status=='C' | b2$status=='sanAa',1,0) 
b2$sanDk <- ifelse(b2$status=='D'  | b2$status=='sanBb',1,0) 
b2$totalvac <- ifelse(b2$status=='San',1,0) 

And 

b2$UGT <- ifelse(b2$status=='UGT',1,0) 
b2$KOM <- ifelse(b2$status=='KOM',1,0) 

But, as one from this forum told me, it doesn't work because the words is in
a wrong format or something like that. 

I have attached the text-file i've used, and the R-kode. 

Hope anyone can help me? 

text-file; 
http://www.nabble.com/file/p21993098/allesd%2528uden%2Bf%25C3%25B8r%2529060209.txt
allesd%28uden+f%C3%B8r%29060209.txt 

R-kode (just run from line 1-22) ;
http://www.nabble.com/file/p21993098/PRRS%2B%2528med%2Ballle%2BSD%2529.r
PRRS+%28med+allle+SD%29.r