Displaying 4 results from an estimated 4 matches for "dstar".
Did you mean:
star
2012 Jul 23
3
3D scatterplot, using size of symbols for the fourth variable
...91876076, 69.8495212,
70.04579295, 64.99869296, 67.95894908, 68.35197804, 64.01693209,
64.74605873, 69.7579387, 68.87333164, 67.97582936, 71.24014378,
71.19738387, 71.54931462, 71.16698452, 70.27831123, 69.36640407,
70.84656085, 66.61085878, 68.05601309, 70.77177025, 71.58583791,
70.39500159), Dstar = c(76.57440089, 60.99585062, 77.46767581,
74.46183953, 69.54177898, 76.21091355, 65.7635468, 72.70359475,
71.04353504, 74.38811189, 74.44360179, 70.00021147, 72.46614626,
73.26103888, 69.67652555, 69.76706304, 73.05627881, 72.20245655,
70.9831013, 73.8268811, 75.1172186, 75.19617965, 75.123409...
2006 Nov 30
3
Expression
Hi all,
I have a question about expression.
In a figure I want to include the term D*obs with the star as as
superscript and obs as subscript. I have even just tried to get the
star to be superscript.
The code I tried was
text(Dstar+7,120,expression(paste({}D,^*))), but that doesn't work and I
get a syntax error.
I can't seem to find anything in the help files that explains it.
Thanks in advance.
Cameron Guenther, Ph.D.
100 8th Ave. SE
St. Petersburg, Fl 33701
727-896-8626 ext. 4305
cameron.guenther at myfwc.com
2008 Jun 16
1
Error in maximum likelihood estimation.
...1)
x <- as.matrix(data.frame(1, as.matrix(dt[, 2:(nx+1)], ncol = 2)))
z <- as.matrix(dt[, (nx+2):(nx+nz+1)], ncol = nz)
d <- z %*% delta / (gamma * sigma2)^.5
mustar <- (1-gamma) * z %*% delta - gamma * ( y - x %*% beta)
sigmastar <- (gamma * (1-gamma) * sigma2)^.5
dstar <- mustar / sigmastar
loglik <- (-0.5 * nrow(x) *(log(2*pi) + log(sigma2))
-0.5 * sum(( y - x %*% beta + z %*% delta)^2/sigma2)
-sum(log(pnorm(d))) + sum(log(pnorm(dstar))))
return(-loglik)
}
-----------------------------------------------
Loglikelihood fun...
2010 Aug 05
2
try-error within for loop
...abd<-t(cbind(c(1:s),rep(1,s)))
taxdiv<-taxondiveO(abd,taxa)
if(class(result)=="try-error") result[[i]] <- NA
else result[[i]] <-taxdiv #it doesnt work
result[[i]]<-as.data.frame(result[[i]])[1,]},silent=T)
taxind<-do.call(rbind,result)
taxind[1:5,]
number D Dstar Lambda Dplus SDplus
1 589 94.72456 94.93875 142.4468 94.88140 55885.15
2 428 80.38656 80.63660 328.7728 80.90432 34627.05
3 282 88.03613 88.45139 332.8963 88.53554 24967.02
4 1320 80.43822 80.51943 328.1416 80.63355 106436.29
5 1077 80.43121 80.53073 287.2267 80.62954...