一个想和大家分享和交流的R程序

jamieye

    jack<-matrix(sample(1:40,100000,replace=T),nrow=100,ncol=1000,byrow=T);

    judgement_da<-function(x,y)
{
tim<-matrix(1:100,nrow=100,ncol=1,byrow=T);
factor(tim)->team_factor;
hanshu<-function(a,b)
{
if(a<20)
{
  b=1;
}
  else
  {
   b=0;
  }
    b;
}
  y<-tapply(x,team_factor,hanshu);
  y;
}

final_result<-apply(jack,2,judgement_da)

R教材中介绍，在写R时应尽量避免显式循环，用apply函数，但是测试发现这段代码运行所用时间比使用for循环更慢，有没有更好的方法？

redcat

反正我觉得，编写好的函数对数据越小越方便，
大规模的数据，比如基因组的一些数据，甚至用R语言就慢的要死，
更甚至是要用一些低级语言编写一些处理程序，满足不同的需求。

总之，感觉，工具用在他适用的范围最好

jamieye

redcat 发表于 2012-3-6 09:46
反正我觉得，编写好的函数对数据越小越方便，
大规模的数据，比如基因组的一些数据，甚至用R语言就慢的要死 ...

要好好学习perl了！

redcat

perl还是很强大的，尤其生物数据处理