Adds truncated noise to titre data

add_noise(y, theta, measurement_bias = NULL, indices = NULL)

Arguments

y

the titre

theta

a vector with MAX_TITRE and error parameters

Value

a noisy titre

Examples

if (FALSE) { ## ... example in simulate_individual pars <- c("error"=1) y <- runif(100) noisy_y <- add_noise(y, pars) }