[R] more on vectoring a simple for

[Deepayan Sarkar]

On Monday 25 November 2002 04:34 pm, Cezar Augusto de Freitas Anselmo wrote:
> Excuse me, but I wasn't clear. It's a generic funcion, like
> f(beta) and g(beta)
>
> result<-rep(0,3)
> for(i in 1:3) result[i]<-sum(f(beta[-i])/g(beta[-i]))
>
> for example, f(beta)=log(abs(beta)) and g(beta)=beta^2:
> for(i in 1:3) result[i]<-sum(log(abs(beta[-i]))/(beta[-i]^2))
>
> How can I write this with no for?

The same thing works, essentially. Assuming f, g are vectorized, 

foo <- log(abs(beta))/(beta^2)  ## in general f(beta)/g(beta)
result <- sum(foo) - foo



-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-
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
_._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._