[Vegan-commits] r980 - pkg/vegan/R

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

Author: jarioksa
Date: 2009-09-01 20:53:43 +0200 (Tue, 01 Sep 2009)
New Revision: 980

Modified:
   pkg/vegan/R/coef.cca.R
Log:
indentation in coef.cca

Modified: pkg/vegan/R/coef.cca.R
===================================================================
--- pkg/vegan/R/coef.cca.R	2009-09-01 18:52:42 UTC (rev 979)
+++ pkg/vegan/R/coef.cca.R	2009-09-01 18:53:43 UTC (rev 980)
@@ -1,10 +1,10 @@
 "coef.cca" <-
 function (object, ...) 
 {
-        k <- !is.na(object$rowsum)
-	Q <- object$CCA$QR
-	u <- object$CCA$u[k,]
-	u <- sweep(u, 1, sqrt(object$rowsum[k]), "*")
-	qr.coef(Q, u)
+    k <- !is.na(object$rowsum)
+    Q <- object$CCA$QR
+    u <- object$CCA$u[k,]
+    u <- sweep(u, 1, sqrt(object$rowsum[k]), "*")
+    qr.coef(Q, u)
 }