library(pomp) ou2() -> po stopifnot( round(sum(dprocess(po)),3)==1.400 ) try( dprocess(po,x=states(po)[,c(1:9,15)],times=time(po)[c(1:9,15)]) )
Add the following code to your website.
REMOVE THIS Copy to clipboard
For more information on customizing the embed code, read Embedding Snippets.