[Vegan-commits] r2291 - in pkg/vegan: . R inst man

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

Author: jarioksa
Date: 2012-09-18 20:49:44 +0200 (Tue, 18 Sep 2012)
New Revision: 2291

Modified:
   pkg/vegan/NAMESPACE
   pkg/vegan/R/fitted.radfit.R
   pkg/vegan/inst/ChangeLog
   pkg/vegan/man/radfit.Rd
Log:
add fitted.radfit.frame()

Modified: pkg/vegan/NAMESPACE
===================================================================
--- pkg/vegan/NAMESPACE	2012-09-18 17:27:31 UTC (rev 2290)
+++ pkg/vegan/NAMESPACE	2012-09-18 18:49:44 UTC (rev 2291)
@@ -171,6 +171,7 @@
 S3method(fitted, cca)
 S3method(fitted, procrustes)
 S3method(fitted, radfit)
+S3method(fitted, radfit.frame)
 S3method(fitted, rda)
 # goodness: vegan
 S3method(goodness, cca)

Modified: pkg/vegan/R/fitted.radfit.R
===================================================================
--- pkg/vegan/R/fitted.radfit.R	2012-09-18 17:27:31 UTC (rev 2290)
+++ pkg/vegan/R/fitted.radfit.R	2012-09-18 18:49:44 UTC (rev 2291)
@@ -3,3 +3,9 @@
 {
     matrix(sapply(object$models, fitted), ncol=length(object$models))
 }
+
+`fitted.radfit.frame` <-
+    function(object, ...)
+{
+    lapply(object, fitted, ...)
+}

Modified: pkg/vegan/inst/ChangeLog
===================================================================
--- pkg/vegan/inst/ChangeLog	2012-09-18 17:27:31 UTC (rev 2290)
+++ pkg/vegan/inst/ChangeLog	2012-09-18 18:49:44 UTC (rev 2291)
@@ -15,6 +15,9 @@
 	that used to fail. In addition, there is one unsolved problem with
 	search order: stats function C() is found instead of variable 'C'
 	and this gives an error message "object is not a matrix".
+
+	* radfit: added fitted() method for radfit.frame objects similar
+	to predict.
 	
 Version 2.1-19 (closed September 16, 2012)
 

Modified: pkg/vegan/man/radfit.Rd
===================================================================
--- pkg/vegan/man/radfit.Rd	2012-09-18 17:27:31 UTC (rev 2290)
+++ pkg/vegan/man/radfit.Rd	2012-09-18 18:49:44 UTC (rev 2291)
@@ -6,6 +6,7 @@
 \alias{as.rad}
 \alias{coef.radfit}
 \alias{fitted.radfit}
+\alias{fitted.radfit.frame}
 \alias{lines.radline}
 \alias{plot.radfit.frame}
 \alias{plot.radfit}