[Depmix-commits] r539 - pkg/depmixS4/R

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

Author: ingmarvisser
Date: 2012-07-25 16:54:45 +0200 (Wed, 25 Jul 2012)
New Revision: 539

Modified:
   pkg/depmixS4/R/allGenerics.R
Log:
Added generic for getmodel, to get models from (dep)mix objects

Modified: pkg/depmixS4/R/allGenerics.R
===================================================================
--- pkg/depmixS4/R/allGenerics.R	2012-07-25 07:18:27 UTC (rev 538)
+++ pkg/depmixS4/R/allGenerics.R	2012-07-25 14:54:45 UTC (rev 539)
@@ -51,7 +51,9 @@
 
 setGeneric("getpars", function(object,which="pars",...) standardGeneric("getpars"))
 
+setGeneric("getmodel", function(object,...) standardGeneric("getmodel"))
 
+
 # functions 
 setGeneric("fit", function(object, ...) standardGeneric("fit"))
 
@@ -67,9 +69,6 @@
 
 setGeneric("predict", function(object, ...) standardGeneric("predict"))
 
-
-# redundant??
-
 # setGeneric("getModel", function(object, ...) standardGeneric("getModel"))
 
 # these are imported from stats4