[Depmix-commits] r182 - trunk/R

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

Author: ingmarvisser
Date: 2008-06-24 16:15:26 +0200 (Tue, 24 Jun 2008)
New Revision: 182

Modified:
   trunk/R/responseNORM.R
Log:
Added default w=NULL in the fit function for NORMresponse objects

Modified: trunk/R/responseNORM.R
===================================================================
--- trunk/R/responseNORM.R	2008-06-24 13:11:04 UTC (rev 181)
+++ trunk/R/responseNORM.R	2008-06-24 14:15:26 UTC (rev 182)
@@ -6,7 +6,7 @@
 # returns: (fitted) response with (new) estimates of parameters
 
 setMethod("fit","NORMresponse",
-	function(object,w) {
+	function(object,w=NULL) {
 		pars <- object at parameters
 		fit <- lm.wfit(x=object at x,y=object at y,w=w)
 		pars$coefficients <- fit$coefficients