How to use complicated FUN in apply ?
Jos? Ernesto Jardim wrote:
Hi everyone I'm trying to use sigma2.mat<-apply(ri.mat,2,'-n/2*log(sum(ri.mat^2)/n)') but it's not working. Is it wrong to use that kind of FUN in apply ? or am I doing something wrong ?!
I think you can construct a new FUN to apply
for example:
fun<-function(x,n){
y_-n/2*log(sum(x^2)/n)
return(y)
}
and then apply it
sigma2.mat<-apply(ri.mat,2,fun)
or use
sigma2.mat<-apply(ri.mat,2, function(x,n){-n/2*log(sum(x^2)/n)} )
============================================================== Alvaro Colina |-|o||o||o||o||o||o||o||o||o|- Area de Quimica Analitica | Pza. Misael Banuelos s/n Facultad de Ciencias | 09001. Burgos. Spain Universidad de Burgos | Phone: 34-947-258817 e-mail: acosa at ubu.es | FAX: 34-947-258831 ============================================================== -.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.- r-help mailing list -- Read http://www.ci.tuwien.ac.at/~hornik/R/R-FAQ.html Send "info", "help", or "[un]subscribe" (in the "body", not the subject !) To: r-help-request at stat.math.ethz.ch _._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._