Code : Tout sélectionner
RSiteSearch("runge kutta")
Code : Tout sélectionner
dta<-data.frame(a=1:10,b=5:14)
dta[dta>5]<-100
Code : Tout sélectionner
slc<-apply(slc,2,as.numeric)
Code : Tout sélectionner
slc<-apply(slc,2,function(x) ifelse(x<5,x,NA))
Code : Tout sélectionner
?table