hello
i use the following code,but it is talking too much time to execute. It
there any alternate code  for the same.
##############################
############
>names(bimas_epitopes)
>dim(bimas_epitopes)
>z6<-NULL;for ( i in 1:1496837) { if (bimas_epitopes[i,7]>39.99 )
z6<-c(z6,i)}
>length(z6)
112301
>temp6<-NULL
>temp6<-z6[1]
>result6<-bimas_epitopes[temp6,]
>for ( i in 2:112301) {
temp6<-z6[i];result6<-rbind(result6,bimas_epitopes[temp6,])}####this code is
talking toooooo much time for row binding########
#############################################
need the alternate if u can help.

-- 
Regards
Ab Rauf Shah

	[[alternative HTML version deleted]]

