Description Usage Arguments Author(s) Examples
Generic method behind calcTemperatedLogDen.default
1 |
... |
Thomas Wutzler
1 2 3 4 5 6 7 8 9 10 11 | data(twdemcEx1)
logDen0 <- stackChains(concatPops(twdemcEx1)$resLogDen)
refLogDen <- apply(logDen0,2,max)
temp = c(obs=20, parms=1)
logDen <- t( (t(logDen0)-refLogDen)*temp +refLogDen )
logDenT <- calcTemperatedLogDen(logDen,temp)
.exp <- logDen0
names(dimnames(.exp)) <- NULL
names(dimnames(logDenT)) <- NULL
all.equal( .exp, logDenT )
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.