phenology (version 10.1)

logLik.Tagloss: Return Log Likelihood of a fit generated by Tagloss_fit

Description

Return Log Likelihood of a fit generated by Tagloss_fit

Usage

# S3 method for Tagloss
logLik(object, ...)

Value

The Log Likelihood value for the fitted model with data

Arguments

object

A result file generated by Tagloss_fit

...

Not used

Author

Marc Girondot

Details

logLik.Tagloss returns Log Likelihood of a fit for tag loss

See Also

Other Model of Tag-loss: Tagloss_L(), Tagloss_LengthObs(), Tagloss_cumul(), Tagloss_daymax(), Tagloss_fit(), Tagloss_format(), Tagloss_mcmc(), Tagloss_mcmc_p(), Tagloss_model(), Tagloss_simulate(), o_4p_p1p2, plot.Tagloss(), plot.TaglossData()

Examples

if (FALSE) {
library(phenology)
# Example
data_f_21 <- Tagloss_format(outLR, model="21")
# Without the N20 the computing is much faster
data_f_21_fast <- subset(data_f_21, subset=(is.na(data_f_21$N20)))
par <- structure(c(48.8292784204825, 1039.02842229274, -89.3162940697861, 
5.21817463244988, 8.00575451188548, 8.32971268127933, 161.265553603601, 
602.935748681661, 2643.57415102633, 16.752815732218, 10.181616195839, 
7.14279063312016), .Names = c("D1_2", "D2D1_2", "D3D2_2", "A_2", 
"B_2", "C_2", "D1_1", "D2D1_1", "D3D2_1", "A_1", "B_1", "C_1"))
o <- Tagloss_fit(data=data_f_21_fast, fitted.parameters=par)
logLik(o)
AIC(o)
}