[rkward-cvs] SF.net SVN: rkward:[2818] trunk/rkward

[tfry at users.sourceforge.net]

Revision: 2818
          http://rkward.svn.sourceforge.net/rkward/?rev=2818&view=rev
Author:   tfry
Date:     2010-04-18 18:42:37 +0000 (Sun, 18 Apr 2010)

Log Message:
-----------
Fix KPSS-test when using short truncation lag

Modified Paths:
--------------
    trunk/rkward/rkward/plugins/analysis/time_series/kpss_test.js
    trunk/rkward/tests/analysis_plugins/RKTestStandard.kpss_test.rkcommands.R

Modified: trunk/rkward/rkward/plugins/analysis/time_series/kpss_test.js
===================================================================
--- trunk/rkward/rkward/plugins/analysis/time_series/kpss_test.js	2010-04-18 10:41:35 UTC (rev 2817)
+++ trunk/rkward/rkward/plugins/analysis/time_series/kpss_test.js	2010-04-18 18:42:37 UTC (rev 2818)
@@ -31,8 +31,8 @@
 	echo ('rk.header ("KPSS Test for Level Stationarity",\n');
 	echo ('	parameters=list ("null hypothesis"="' + getValue ("null") + '", "version of truncation lag parameter"="');
 	if (getValue ("lshort") == "TRUE") echo ("short");
-	else echo ("long" + '"))\n');
-	echo ('\n');
+	else echo ("long");
+	echo ('"))\n');
 	echo ('rk.results (results)\n');
 }
 

Modified: trunk/rkward/tests/analysis_plugins/RKTestStandard.kpss_test.rkcommands.R
===================================================================
--- trunk/rkward/tests/analysis_plugins/RKTestStandard.kpss_test.rkcommands.R	2010-04-18 10:41:35 UTC (rev 2817)
+++ trunk/rkward/tests/analysis_plugins/RKTestStandard.kpss_test.rkcommands.R	2010-04-18 18:42:37 UTC (rev 2818)
@@ -20,7 +20,6 @@
 ## Print result
 rk.header ("KPSS Test for Level Stationarity",
 	parameters=list ("null hypothesis"="Trend", "version of truncation lag parameter"="long"))
-
 rk.results (results)
 })
 .rk.rerun.plugin.link(plugin="rkward::kpss_test", settings="length.state=1\nlshort.string=FALSE\nnarm.state=0\nnull.string=Trend\nx.available=test10y\\ntest10z\\ntest50x\\ntest50y", label="Run again")


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.