# LnRI_norm: Return a remigration interval. In phenology: Tools to Manage a Parametric Function that Describes Phenology and More

## Description

Model of remigration interval
The vector of parameters must include:
sx, survival for year x
if s is included, all years have the same survival
tx, Tag retention for year x
rx, probability of return for year x
cx, probability of return for year x
px, probability of observation for year x

## Usage

 `1` ```LnRI_norm(data, x, kl = NULL) ```

## Arguments

 `data` Data with remigration intervals `x` Vector of parameters `kl` Maximum number of years for remigration intervals.

## Details

lnRI_norm returns a ln L

## Value

Return a remigration interval.

## Author(s)

Marc Girondot

Other Model of Remigration Interval: `Bayesian.remigration()`, `RI()`, `plot.Remigration()`
 ``` 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19``` ```## Not run: library(phenology) # Example # Each year a fraction of 0.9 is surviving s <- c(s1=0.9, s2=0.9, s3=0.9, s4=0.9, s5=0.9) # Probability of tag retention; 0.95 the first year then after no loss t <- c(t1=0.95, t2=1, t3=1, t4=1, t5=1) # Time-conditional return probability - This is the true remigration rate r <- c(r1=0.1, r2=0.8, r3=0.7, r4=0.7, r5=1) # Capture probability p <- c(p1=0.6, p2=0.6, p3=0.6, p4=0.6, p5=0.6) # Number of observations for 400 tagged females after 1, 2, 3, 4, and 5 years OBS <- c(400, 10, 120, 40, 20, 10) # Likelihood of the observed number based on the model LnRI_norm(data=OBS, x = c(s, t, r, p, sd=2) ) LnRI_norm(data=OBS, x = c(s=0.97, t, r, p, sd=2) ) ## End(Not run) ```