search for: equation1

Hello there, I don't know if I'm addressing my question to the right e-mail address, I hope I do. Actually I have a little problem concerning writing a code in R. I try to briefly sum up my problem. As you can see below, I created the functions "Equation1" and "Equation2" with some conditions. Equation1 <-function(x){ if (x<=0.25) y <-1-4*x if (x>0.25) y <-0 y } Equation2 <-function(x){...

...reference to a "packages" option or parameter. > library(MonteCarlo) Loading required package: abind Loading required package: codetools Loading required package: rlecuyer Loading required package: snow Loading required package: snowfall > infest_kud_fun<-function(x,A,B){ +?? equation1=exp(A-(B*x)) +?? return(list("equation1"=equation1)) + } > x_grid<-c(0.5,10) #distances kudzu could grow > A_grid<-rnorm(1000) #probabilities > B_grid<- rnorm(1000) #probabilities > #put parameters in a list > param_list_kud=list("x"=x_grid, &quo...

...parameter. > > > library(MonteCarlo) > Loading required package: abind > Loading required package: codetools > Loading required package: rlecuyer > Loading required package: snow > Loading required package: snowfall > > > infest_kud_fun<-function(x,A,B){ > + equation1=exp(A-(B*x)) > + return(list("equation1"=equation1)) > + } > > > > x_grid<-c(0.5,10) #distances kudzu could grow > > A_grid<-rnorm(1000) #probabilities > > B_grid<- rnorm(1000) #probabilities > > > > #put parameters in a list > >...