[R] loop function and integrate?

faeriewhisper my.velvet.faerie.tale at gmail.com
Fri Nov 30 16:08:39 CET 2012


Hi guys! 
I have to compute something and i don't know what i'm doing wrong. my code
is a bit complex, but imagine that is something like this: 

a = c(1,2,3,4) 
ia = length(a) 

x = seq(1,100,length=0.1) 
ib = length(x) 

int1 = numeric(ib) 
b = numeric(ib) 

for(j in 1:ia) { 
   H = function(x) {sin(x + a[j])} 
      for(i in 1:ib) {	
                int =  integrate(H, lower = 0, upper = x[i]) 
                int1[i] = int[1] 
                b[i] = 1 + a[i] 
                } 
        end 
   int1 = unlist(int1) 
   int2 = int1*b 
   ss[j] = sum(int2) 
} 
end 

if i try this code without the for loop it's ok, but when i put the for on,
i get all sort of errors... 
Thank you for your help :) 



--
View this message in context: http://r.789695.n4.nabble.com/loop-function-and-integrate-tp4651436.html
Sent from the R help mailing list archive at Nabble.com.



More information about the R-help mailing list