[R] who can give me some hint?

Simon Pickett simon.pickett at bto.org
Thu Mar 12 11:33:35 CET 2009


 Hi All,


> act_2
         Date    Dtime Hour Min Second               Rep
51 2006-02-22 14:52:18   14  52     18  useractivity_act
52 2006-02-22 14:52:18   14  52     18                 4
55 2006-02-22 14:52:49   14  52     49                 4
57 2006-02-22 14:52:51   14  52     51                 4
58 2006-02-22 14:52:52   14  52     52                 3
60 2006-02-22 14:54:42   14  54     42 useractivity_idle

I want to change act_2 to
         Date    Dtime Hour Min Second               Rep

51 2006-02-22 14:52:18   14  52     18  useractivity_act

52 2006-02-22 14:52:18   14  52     18                 4
58 2006-02-22 14:52:52   14  52     52                 3
60 2006-02-22 14:54:42   14  54     42 useractivity_idle

in other word, I want to keep 1st if there are many repeated value, I made 
the program as:

Not sure what you mean here, can you describe this more fully?

It seems that you might be able to avoid using loops if all you want to do 
is select only the rows where column x is less than a threshold value.
e.g.
a<-a[a$columnx<1000,]

Hope this helps

Simon.


rm_r<-function(act_2){
 dm<-dim(act_2)[1]-1
 for(i in 2:dm){

 if(act_2$Rep[i+1]==act_2$Rep[i]){
   act_2<-act_2[-(i+1),]
   }else{
   act_2<-act_2
   }
 }
return(act_2)
}

when it moved one row on 1st loop, i should still start 2 but it become 3 at 
2nd loop, if I add i<-i-1, then i go to 1
seems not reasonbale. How should I modify it`?

Tammy
_________________________________________________________________
Drag n' drop-Get easy photo sharing with Windows LiveT Photos.

http://www.microsoft.com/windows/windowslive/products/photos.aspx
[[alternative HTML version deleted]]




--------------------------------------------------------------------------------


> ______________________________________________
> R-help at 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.
>




More information about the R-help mailing list