[Analogue-commits] r334 - pkg/R

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

Author: gsimpson
Date: 2013-06-04 05:04:16 +0200 (Tue, 04 Jun 2013)
New Revision: 334

Modified:
   pkg/R/prcurve.R
Log:
minor code reformatting

Modified: pkg/R/prcurve.R
===================================================================
--- pkg/R/prcurve.R	2013-06-04 03:03:27 UTC (rev 333)
+++ pkg/R/prcurve.R	2013-06-04 03:04:16 UTC (rev 334)
@@ -85,9 +85,9 @@
     while (!converged && iter < maxit) {
         iter <- iter + 1L
         for(j in seq_len(m)) {
-          smooths[[j]] <- smoother(config$lambda, X[, j],
-                                   complexity = complexity[j],
-                                   choose = FALSE, ...)
+            smooths[[j]] <- smoother(config$lambda, X[, j],
+                                     complexity = complexity[j],
+                                     choose = FALSE, ...)
             s[, j] <- fitted(smooths[[j]])
         }
         ##