[Depmix-commits] r492 - in pkg/depmix: . R

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

Author: ingmarvisser
Date: 2011-09-20 16:47:56 +0200 (Tue, 20 Sep 2011)
New Revision: 492

Added:
   pkg/depmix/NAMESPACE
Modified:
   pkg/depmix/DESCRIPTION
   pkg/depmix/R/depmix.R
Log:
Trial to add Namespace to depmix, failed so far ...

Modified: pkg/depmix/DESCRIPTION
===================================================================
--- pkg/depmix/DESCRIPTION	2011-09-16 11:46:54 UTC (rev 491)
+++ pkg/depmix/DESCRIPTION	2011-09-20 14:47:56 UTC (rev 492)
@@ -4,7 +4,7 @@
 Title: Dependent Mixture Models
 Author: Ingmar Visser <i.visser at uva.nl>
 Maintainer: Ingmar Visser <i.visser at uva.nl>
-Depends: R (>= 2.13.1), MASS
+Depends: R (>= 2.12.1), MASS
 Suggests: Rdonlp2
 Description: Fit (multigroup) mixtures of latent Markov models on mixed categorical and continuous (timeseries) data 
 License: GPL
\ No newline at end of file

Added: pkg/depmix/NAMESPACE
===================================================================
--- pkg/depmix/NAMESPACE	                        (rev 0)
+++ pkg/depmix/NAMESPACE	2011-09-20 14:47:56 UTC (rev 492)
@@ -0,0 +1,19 @@
+useDynLib(depmix)
+
+# import(methods)
+
+export(dmm,mgdmm,fitdmm,mixdmm,loglike,oneliner,bootstrap,posterior,
+	generate,lca)
+
+S3method(summary,dmm)
+S3method(summary,mgd)
+S3method(summary,mixdmm)
+
+S3method(summary,md)
+S3method(print,md)
+S3method(plot,md)
+
+S3method(summary,fit)
+
+
+


Property changes on: pkg/depmix/NAMESPACE
___________________________________________________________________
Added: svn:eol-style
   + native

Modified: pkg/depmix/R/depmix.R
===================================================================
--- pkg/depmix/R/depmix.R	2011-09-16 11:46:54 UTC (rev 491)
+++ pkg/depmix/R/depmix.R	2011-09-20 14:47:56 UTC (rev 492)
@@ -1,14 +1,13 @@
 ## package for fitting dependent mixture models
 
-.First.lib <- function(lib, pkg) {
-  library.dynam("depmix", pkg, lib)
-  require(MASS)
-}
+# .onLoad <- function(lib, pkg) {
+# 	library.dynam("depmix", pkg, lib)
+# }
+# 
+# .onUnLoad <- function(libpath) {
+# 	library.dynam.unload("depmix",libpath)
+# }
 
-.Last.lib <- function(libpath) {
-	library.dynam.unload("depmix",libpath)
-}
-
 ###################################
 #                                 #
 #   FIT DEPENDENT MIXTURE MODEL   #