Author: gsimpson
Date: 2013-07-20 23:42:03 +0200 (Sat, 20 Jul 2013)
New Revision: 348
Modified:
pkg/tests/Examples/analogue-Ex.Rout.save
Log:
update example test output following r347
Modified: pkg/tests/Examples/analogue-Ex.Rout.save
===================================================================
--- pkg/tests/Examples/analogue-Ex.Rout.save 2013-07-20 21:41:14 UTC (rev 347)
+++ pkg/tests/Examples/analogue-Ex.Rout.save 2013-07-20 21:42:03 UTC (rev 348)
@@ -5680,99 +5680,11 @@
PC Converged in 6 iterations.
>
-> ## Fit principal curve using a GAM - currently slow ~10secs
-> aber.pc3 <- prcurve(abernethy2, method = "ca", trace = TRUE,
-+ vary = TRUE, smoother = smoothGAM, bs = "cr")
-
- Determining initial DFs for each variable...
-
- |
- | | 0%
- |
- |== | 3%
- |
- |==== | 6%
- |
- |====== | 8%
- |
- |======== | 11%
- |
- |========== | 14%
- |
- |============ | 17%
- |
- |============== | 19%
- |
- |================ | 22%
- |
- |================== | 25%
- |
- |=================== | 28%
- |
- |===================== | 31%
- |
- |======================= | 33%
- |
- |========================= | 36%
- |
- |=========================== | 39%
- |
- |============================= | 42%
- |
- |=============================== | 44%
- |
- |================================= | 47%
- |
- |=================================== | 50%
- |
- |===================================== | 53%
- |
- |======================================= | 56%
- |
- |========================================= | 58%
- |
- |=========================================== | 61%
- |
- |============================================= | 64%
- |
- |=============================================== | 67%
- |
- |================================================= | 69%
- |
- |=================================================== | 72%
- |
- |==================================================== | 75%
- |
- |====================================================== | 78%
- |
- |======================================================== | 81%
- |
- |========================================================== | 83%
- |
- |============================================================ | 86%
- |
- |============================================================== | 89%
- |
- |================================================================ | 92%
- |
- |================================================================== | 94%
- |
- |==================================================================== | 97%
- |
- |======================================================================| 100%
-
-
-Fitting Principal Curve:
-
-Initial curve: d.sq: 103233.450
-Iteration 1: d.sq: 5266.091
-Iteration 2: d.sq: 4939.941
-Iteration 3: d.sq: 4946.650
-Iteration 4: d.sq: 5000.879
-Iteration 5: d.sq: 5004.138
-
-PC Converged in 5 iterations.
-
+> ## Not run:
+> ##D ## Fit principal curve using a GAM - currently slow ~10secs
+> ##D aber.pc3 <- prcurve(abernethy2, method = "ca", trace = TRUE,
+> ##D vary = TRUE, smoother = smoothGAM, bs = "cr")
+> ## End(Not run)
>
>
>
@@ -7443,7 +7355,7 @@
> ###
> options(digits = 7L)
> base::cat("Time elapsed: ", proc.time() - base::get("ptime", pos = 'CheckExEnv'),"\n")
-Time elapsed: 35.017 0.416 38.804 0.003 0.001
+Time elapsed: 23.821 0.291 25.103 0.001 0.004
> grDevices::dev.off()
null device
1