Displaying 3 results from an estimated 3 matches for "delta0".
Did you mean:
delta
2008 Jan 04
2
R2WinBUGS sending variables as factors
...ce
University of Tasmania and CSIRO Marine and Atmospheric Research
ph +62 3 6232 5182
mb +61 429 32 5182
model
{
#Centre variables
mSeaW <- mean(SeaW[])
s_dSeaW <- sd(SeaW[])
#normalise Variables
nSeaWiFS <- mSeaW/s_dSeaW
for(i in 1:N) {
log(lambda[i]) <- delta0 + alpha1 * Month[i] + alpha2 * Lat[i] +
beta1 * (SeaW[i] - nSeaW)
logit(p[i]) <- gamma0
mu[i, 1] <- 0
mu[i, 2] <- lambda[i]
mu.i[i] <- mu[i, index[i]]
index[i] ~ dcat(theta[i, 1:2])
theta[i, 1] <- p[i]
theta[i, 2] <- 1 - p[i]
# mixture
YFTCPUE[i] ~ dpo...
2002 Mar 12
1
Sparse matrix methods
Does anyone know of contributions to R for solving sparse linear systems?
In particular for spatial stats I am interested in solving large
positive definite symmetric systems.
Thanks in advance,
Doug
-----------------------------------------------------------------------------
Doug Nychka,
Geophysical Statistics Project Email: nychka at ucar.edu
National Center for Atmospheric
2010 Mar 16
0
recursive term
Hi r-users;
I have this values:
eign_val <- c(137.810447,3.538721,2.995161,1.685670)
alp <- 1.6549 ; lamda <- eign_val
lamda_m <- min(lamda)
First I calculated manually:
delta0 <- 1
delta1 <- alp*delta0*(4-lamda_m*(1/lamda[1]+1/lamda[2]+1/lamda[3]+1/lamda[4]))
delta1
delta2 <- (alp/2)*(delta1*(delta1/alp) + delta0*((1-lamda_m/lamda[1])^2+ (1-lamda_m/lamda[2])^2+(1-lamda_m/lamda[3])^2+(1-lamda_m/lamda[4])^2))
delta2
delta3 <- (alp/3)*(delta2*(delta1/alp) + de...