FVDDP = initialize(1, function(x) rpois(x, 3),
function(x) dpois(x, 3), TRUE)
FVDDP = update(FVDDP, c(4,5))
propagate(FVDDP, 0.2)
FVDDP = initialize(3, function(x) rnorm(x, -1,3),
function(x) dnorm(x, -1, 3), FALSE)
FVDDP = update(FVDDP, c(-1.145, 0.553, 0.553, 0.553))
propagate(FVDDP, 0.6)
Run the code above in your browser using DataLab