That works perfectly! Thanks so much.
DUSTIN
--
View this message in context:
http://r.789695.n4.nabble.com/Integration-with-variable-bounds-tp3413606p3416851.html
Sent from the R help mailing list archive at Nabble.com.
__
R-help@r-project.org mailin
han
Date: Tuesday, March 29, 2011 9:13 pm
Subject: Re: [R] Integration with variable bounds
To: Dmlong21
Cc: r-help@r-project.org
> You get 0 because you did not specify lower and upper bounds that
> define the hyper-rectangle; therefore, the default is used which is (0,1)^4.
>
> Specify
Professor,
Division of Geriatric Medicine and Gerontology
School of Medicine
Johns Hopkins University
Ph. (410) 502-2619
email: rvarad...@jhmi.edu
- Original Message -
From: Dmlong21
Date: Tuesday, March 29, 2011 3:11 pm
Subject: Re: [R] Integration with variable bounds
To: r-help@r
Thanks for the tip but all I get is 0 for the integral. Any other
suggestions?
int <- function(y){
u2 = y[1]
z2 = y[2]
u1 =y[3]
z1 = y[4]
reg.nonzero <- (u2 > z1 & u2 < z2) & (z2 > z1 & z2 < 12) & (u1 > 4 & u1 <
z1) & (z1 > 4 & z1 < 12)
ff <- ifelse (reg.nonzero, u1*(z1-u1)*u2*(z2-u2)*exp(-0.0
One useful trick is to use the indicator function in your integrand to define
regions where the integrand is non-zero.
int <- function(y){
u2 = y[1]
z2 = y[2]
u1 =y[3]
z1 = y[4]
reg.nonzero <- (u2 > z1 & u2 <= 12) & (z2 > z1 & z2 <= 12) & (u1 > 4 & u1 <=
z2) & (u2 > 4 & u2 <= z2)
ff <- ifelse
5 matches
Mail list logo