[Pomp-commits] r682 - pkg/pomp/inst/doc

[noreply at r-forge.r-project.org]

Author: kingaa
Date: 2012-04-25 23:53:47 +0200 (Wed, 25 Apr 2012)
New Revision: 682

Modified:
   pkg/pomp/inst/doc/advanced_topics_in_pomp.Rnw
Log:
- minor tweak to pompBuilder example


Modified: pkg/pomp/inst/doc/advanced_topics_in_pomp.Rnw
===================================================================
--- pkg/pomp/inst/doc/advanced_topics_in_pomp.Rnw	2012-04-25 21:50:46 UTC (rev 681)
+++ pkg/pomp/inst/doc/advanced_topics_in_pomp.Rnw	2012-04-25 21:53:47 UTC (rev 682)
@@ -578,7 +578,7 @@
 
   dW = rgammawn(beta_sd,dt); // gamma noise, mean=dt, variance=(beta_sd^2 dt)
   periodic_bspline_basis_eval(t,period,degree,nbasis,seasonality);
-  beta = exp(log(beta1)*seasonality[0]+log(beta2)*seasonality[1]+log(beta3)*seasonality[2]);
+  beta = beta1*seasonality[0]+beta2*seasonality[1]+beta3*seasonality[2];
 
   // compute the transition rates
   rate[0] = mu*popsize;		// birth into susceptible class