if and & statement in R -

-

i have data.frame 4 columns that:

> bb                v1      v2      v3       v4 1         arfgef2 arfgef2 arfgef2     <na> 2           sfrs5    <na>   srsf5     <na> 3 ensg00000215104    <na>    <na> chmp1b2p 4            edf1    edf1    edf1     <na> 5    loc100133678    <na>    <na>     <na> 6            cd3g    cd3g       -     <na> 7           gnai2   gnai2   gnai2     <na>

i want create new column according values on columns 2, 3, , 4. trying : if bb[,2] na and bb[,3] has value bb[,5] value of bb[,3], if bb[,2] na and bb[,3] na , df[,4] has value bb[,5] value of bb[,4], else bb[,5] df[,1]. here expected output:

> bb                 v1      v2      v3       v4       v5 1          arfgef2 arfgef2 arfgef2     <na>  arfgef2 2            sfrs5    <na>   srsf5     <na>    srsf5 3  ensg00000215104    <na>    <na> chmp1b2p chmp1b2p 4             edf1    edf1    edf1     <na>     edf1 5     loc100133678    <na>    <na>     <na>     <na> 6             cd3g    cd3g       -     <na>        - 7            gnai2   gnai2   gnai2     <na>    gnai2

i've trying code doesn't work:

> (i in 1:nrow(bb)){       if (is.na(bb[i,2] & !(is.na(bb[i,3])))) {bb[i,5] <- as.character(bb[i,3])}     else if (is.na(bb[i,2]) & !(is.na(bb[i,4]))) {bb[i,5] <- as.character(bb[i,4])}     else { bb[i,5] <- bb[i,1]} } warning messages:  1: in ops.factor(bb[i, 2], !(is.na(bb[i, 3]))) :   & not meaningful factors  2: in ops.factor(bb[i, 2], !(is.na(bb[i, 3]))) :   & not meaningful factors  3: in ops.factor(bb[i, 2], !(is.na(bb[i, 3]))) :   & not meaningful factors  4: in ops.factor(bb[i, 2], !(is.na(bb[i, 3]))) :   & not meaningful factors  5: in ops.factor(bb[i, 2], !(is.na(bb[i, 3]))) :   & not meaningful factors  6: in ops.factor(bb[i, 2], !(is.na(bb[i, 3]))) :   & not meaningful factors  7: in ops.factor(bb[i, 2], !(is.na(bb[i, 3]))) :   & not meaningful factors

how use & if statement? example of longer data.frame create new column (v5) taking values of v1 if v2 not na. in case of v2 being na, first want check whether v3 has value , if true v5 v3 value, second, if v3 na , v4 has value v5 value of v4, if v3 , v4 na v5 v1.

many thanks

your for loop should using && instead of &. missing bracket @ first is.na. try ifelse function, along lines

bb[,5] <- ifelse(is.na(bb[,2]) & !is.na(bb[,3]),              bb[,3],              ifelse(is.na(bb[,2]) & !is.na(bb[,4]), bb[,4], bb[,1])           )

(untested)


Comments

Post a Comment

Popular posts from this blog

c# - Unity IoC Lifetime per HttpRequest for UserStore -

-
i'm trying clean default implementation of accountcontroller.cs comes out of box in new mvc5/owin security implementation. have modified constructor this: private usermanager<applicationuser> usermanager; public accountcontroller(usermanager<applicationuser> usermanager) { this.usermanager = usermanager; } also, have created lifetime manager unity looks this: public class httpcontextlifetimemanager<t> : lifetimemanager, idisposable { private httpcontextbase _context = null; public httpcontextlifetimemanager() { _context = new httpcontextwrapper(httpcontext.current); } public httpcontextlifetimemanager(httpcontextbase context) { if (context == null) throw new argumentnullexception("context"); _context = context; } public void dispose() { this.removevalue(); } public override object get...
Read more

Change the color of an oval at click in Java AWT -

-
i have draw ovals in java, , @ click change color. beginning tried change color after 20 ms, doesn't work. my code is: public class mycomponentnew extends frame { public graphics2d g2d; public mycomponentnew(string title) { super(title); setsize(400, 550); } @override public void paint(graphics g) { this.g2d = (graphics2d) g; this.g2d.setcolor(color.red); this.g2d.filloval(10, 55, 50, 100); } public void changecolor () { this.g2d.setcolor(color.blue); this.g2d.filloval(10, 55, 50, 100); } } and in class main method have: mycomponentnew m; m = new mycomponentnew("fereastra cu baloane"); m.setvisible(true); m.addwindowlistener(new windowadapter() { @override public void windowclosing(windowevent we) { system.exit(0); } }); try { thread.sleep(20); } catch(interruptedexception e) {} m.changecolor(); the color of oval remains red. ...
Read more

I am trying to solve the error message 'incompatible ranks 0 and 1 in assignment' in a fortran 95 program. -

-
i writing program in fortran find velocity of parachuting person in relation time. keep getting error can't fix. new programming , appreciated. the error is v(i+1)=v(i)+[32-((c*v(i)*v(i))/m)]*(h) 1 error: incompatible ranks 0 , 1 in assignment @ (1) and program is program para integer :: real :: v(11) !velocity real :: q !initial velocity real :: h !time step real :: c !drag coefficient real :: m !mass ! gravity equal 32 ft/s^2 write (*,*)'enter time step' read(*,*)h write(*,*)'enter initial velocity' read(*,*)q write(*,*)'enter drag coefficient' read(*,*)c write(*,*)'enter mass' read(*,*)m i=1,10 ! 1 10, 1 being interval. end v(i+1)=v(i)+[32-((c*v(i)*v(i))/m)]*(h) q=v(1) end program you cannot use [] normal parenthesis in expressions. array constructor, [ items ] means array items elements. end do should after line.
Read more