[rkward-cvs] SF.net SVN: rkward:[4367] branches/release_branch_0.6.0

tfry at users.sourceforge.net tfry at users.sourceforge.net
Mon Oct 15 10:58:42 UTC 2012


Revision: 4367
          http://rkward.svn.sourceforge.net/rkward/?rev=4367&view=rev
Author:   tfry
Date:     2012-10-15 10:58:42 +0000 (Mon, 15 Oct 2012)
Log Message:
-----------
Merge r4366 from trunk, and clean ChangeLog

Revision Links:
--------------
    http://rkward.svn.sourceforge.net/rkward/?rev=4366&view=rev

Modified Paths:
--------------
    branches/release_branch_0.6.0/ChangeLog
    branches/release_branch_0.6.0/rkward/plugins/distributions/beta_probabilities.js
    branches/release_branch_0.6.0/rkward/plugins/distributions/beta_quantiles.js
    branches/release_branch_0.6.0/rkward/plugins/distributions/binomial_quantiles.js
    branches/release_branch_0.6.0/rkward/plugins/distributions/binomial_tail_probabilities.js
    branches/release_branch_0.6.0/rkward/plugins/distributions/cauchy_probabilities.js
    branches/release_branch_0.6.0/rkward/plugins/distributions/cauchy_quantiles.js
    branches/release_branch_0.6.0/rkward/plugins/distributions/chi_squared_probabilities.js
    branches/release_branch_0.6.0/rkward/plugins/distributions/chi_squared_quantiles.js
    branches/release_branch_0.6.0/rkward/plugins/distributions/exponential_probabilities.js
    branches/release_branch_0.6.0/rkward/plugins/distributions/exponential_quantiles.js
    branches/release_branch_0.6.0/rkward/plugins/distributions/f_probabilities.js
    branches/release_branch_0.6.0/rkward/plugins/distributions/f_quantiles.js
    branches/release_branch_0.6.0/rkward/plugins/distributions/gamma_probabilities.js
    branches/release_branch_0.6.0/rkward/plugins/distributions/gamma_quantiles.js
    branches/release_branch_0.6.0/rkward/plugins/distributions/geom_probabilities.js
    branches/release_branch_0.6.0/rkward/plugins/distributions/geom_quantiles.js
    branches/release_branch_0.6.0/rkward/plugins/distributions/gumbel_probabilities.js
    branches/release_branch_0.6.0/rkward/plugins/distributions/gumbel_quantiles.js
    branches/release_branch_0.6.0/rkward/plugins/distributions/hypergeometric_probabilities.js
    branches/release_branch_0.6.0/rkward/plugins/distributions/hypergeometric_quantiles.js
    branches/release_branch_0.6.0/rkward/plugins/distributions/log_normal_probabilities.js
    branches/release_branch_0.6.0/rkward/plugins/distributions/log_normal_quantiles.js
    branches/release_branch_0.6.0/rkward/plugins/distributions/logistic_probabilities.js
    branches/release_branch_0.6.0/rkward/plugins/distributions/logistic_quantiles.js
    branches/release_branch_0.6.0/rkward/plugins/distributions/negative_binomial_probabilities.js
    branches/release_branch_0.6.0/rkward/plugins/distributions/negative_binomial_quantiles.js
    branches/release_branch_0.6.0/rkward/plugins/distributions/normal_probabilities.js
    branches/release_branch_0.6.0/rkward/plugins/distributions/normal_quantiles.js
    branches/release_branch_0.6.0/rkward/plugins/distributions/poisson_probabilities.js
    branches/release_branch_0.6.0/rkward/plugins/distributions/poisson_quantiles.js
    branches/release_branch_0.6.0/rkward/plugins/distributions/t_probabilities.js
    branches/release_branch_0.6.0/rkward/plugins/distributions/t_quantiles.js
    branches/release_branch_0.6.0/rkward/plugins/distributions/tukey_probabilities.js
    branches/release_branch_0.6.0/rkward/plugins/distributions/tukey_quantiles.js
    branches/release_branch_0.6.0/rkward/plugins/distributions/uniform_probabilities.js
    branches/release_branch_0.6.0/rkward/plugins/distributions/uniform_quantiles.js
    branches/release_branch_0.6.0/rkward/plugins/distributions/weibull_probabilities.js
    branches/release_branch_0.6.0/rkward/plugins/distributions/weibull_quantiles.js
    branches/release_branch_0.6.0/rkward/plugins/distributions/wilcoxon_probabilities.js
    branches/release_branch_0.6.0/rkward/plugins/distributions/wilcoxon_quantiles.js
    branches/release_branch_0.6.0/rkward/scriptbackends/common.js

Property Changed:
----------------
    branches/release_branch_0.6.0/


Property changes on: branches/release_branch_0.6.0
___________________________________________________________________
Modified: svn:mergeinfo
   - /branches/2010_10_18_backend_restructuring_branch:3130-3196
/branches/release_branch_0.5.4:3098-3102,3127
/branches/release_branch_0.5.7:3913,3979-3980,3998
   + /branches/2010_10_18_backend_restructuring_branch:3130-3196
/branches/release_branch_0.5.4:3098-3102,3127
/branches/release_branch_0.5.7:3913,3979-3980,3998
/trunk/rkward:4366

Modified: branches/release_branch_0.6.0/ChangeLog
===================================================================
--- branches/release_branch_0.6.0/ChangeLog	2012-10-15 10:45:52 UTC (rev 4366)
+++ branches/release_branch_0.6.0/ChangeLog	2012-10-15 10:58:42 UTC (rev 4367)
@@ -1,7 +1,9 @@
+--- Version 0.6.0 - Oct-XX-2012
+- Fixed: Entering "0" as propabilities (quantiles) vector in distribution plugins would cause error message
 - Preview device windows will display some status information (most importantly, warnings or errors)
 - Most plot plugins gain options to control margins and tick label orientation
 - Added option for installing packages from source (implicitly enabled on Unixoid platforms)
-- Fixed: Wrong handling of carriage returns ('\r') in the console window				TODO: also fix for the command log and other places
+- Fixed: Wrong handling of carriage returns ('\r') in the console window
 - Fixed: Spinboxes had wrong initial values
 - Omit comments on missing function calls in dialog code windows (e.g., if prepare() is unused, there's no "## Prepare" in the output either)
 - Output markup is now more XHTML compliant and easier to parse
@@ -37,7 +39,7 @@
 - Fixed: On Windows, detached windows would sometimes be positioned with the menubar outside the upper screen edge
 - Added GUI support for inspecting the call stack during debugging
 - The backend executable is no longer linked against KDE libraries
-- Objects, which are not acceptable in a varslot, will still be shown, there, with a warning		TODO: add a UI to override
+- Objects, which are not acceptable in a varslot, will still be shown, there, with a warning
 
 --- Version 0.5.7 - Oct-23-2011
 - Fixed: Would not system-defined text color for argument hints

Modified: branches/release_branch_0.6.0/rkward/plugins/distributions/beta_probabilities.js
===================================================================
--- branches/release_branch_0.6.0/rkward/plugins/distributions/beta_probabilities.js	2012-10-15 10:45:52 UTC (rev 4366)
+++ branches/release_branch_0.6.0/rkward/plugins/distributions/beta_probabilities.js	2012-10-15 10:58:42 UTC (rev 4367)
@@ -2,7 +2,7 @@
 var q;
 
 function calculate () {
-	q = "c (" + getValue ("q").replace (/[, ]+/g, ", ") + ")";
+	q = "c (" + getString ("q").replace (/[, ]+/g, ", ") + ")";
 
 	echo ('result <- (pbeta (q = ' + q + ', shape1 = ' + getValue ("shape1") + ', shape2 = ' + getValue ("shape2") + ', ncp = ' + getValue ("ncp") + ', ' + getValue ("tail") + ', ' + getValue("logp") + '))\n');
 }

Modified: branches/release_branch_0.6.0/rkward/plugins/distributions/beta_quantiles.js
===================================================================
--- branches/release_branch_0.6.0/rkward/plugins/distributions/beta_quantiles.js	2012-10-15 10:45:52 UTC (rev 4366)
+++ branches/release_branch_0.6.0/rkward/plugins/distributions/beta_quantiles.js	2012-10-15 10:58:42 UTC (rev 4367)
@@ -2,7 +2,7 @@
 var p;
 
 function calculate () {
-	p = "c (" + getValue ("p").replace (/[, ]+/g, ", ") + ")";
+	p = "c (" + getString ("p").replace (/[, ]+/g, ", ") + ")";
 
 	echo ('result <- (qbeta (p = ' + p + ', shape1 = ' + getValue ("shape1") + ', shape2 = ' + getValue ("shape2") + ', ncp = ' + getValue ("ncp") + ', ' + getValue ("tail") + ', ' + getValue("logp") + '))\n');
 }

Modified: branches/release_branch_0.6.0/rkward/plugins/distributions/binomial_quantiles.js
===================================================================
--- branches/release_branch_0.6.0/rkward/plugins/distributions/binomial_quantiles.js	2012-10-15 10:45:52 UTC (rev 4366)
+++ branches/release_branch_0.6.0/rkward/plugins/distributions/binomial_quantiles.js	2012-10-15 10:58:42 UTC (rev 4367)
@@ -2,7 +2,7 @@
 var p;
 
 function calculate () {
-	p = "c (" + getValue ("p").replace (/[, ]+/g, ", ") + ")";
+	p = "c (" + getString ("p").replace (/[, ]+/g, ", ") + ")";
 
 	echo ('result <- (qbinom (p = ' + p + ', size = ' + getValue ("size") + ', prob = ' + getValue ("prob") + ', ' + getValue ("tail") + ', ' + getValue ("logp") + '))\n');
 }

Modified: branches/release_branch_0.6.0/rkward/plugins/distributions/binomial_tail_probabilities.js
===================================================================
--- branches/release_branch_0.6.0/rkward/plugins/distributions/binomial_tail_probabilities.js	2012-10-15 10:45:52 UTC (rev 4366)
+++ branches/release_branch_0.6.0/rkward/plugins/distributions/binomial_tail_probabilities.js	2012-10-15 10:58:42 UTC (rev 4367)
@@ -2,7 +2,7 @@
 var q;
 
 function calculate () {
-	q = "c (" + getValue ("q").replace (/[, ]+/g, ", ") + ")";
+	q = "c (" + getString ("q").replace (/[, ]+/g, ", ") + ")";
 
 	echo ('result <- (pbinom (q = ' + q + ', size = ' + getValue ("size") + ', prob = ' + getValue ("prob") + ', ' + getValue ("tail") + ', ' + getValue ("logp") + '))\n');
 }

Modified: branches/release_branch_0.6.0/rkward/plugins/distributions/cauchy_probabilities.js
===================================================================
--- branches/release_branch_0.6.0/rkward/plugins/distributions/cauchy_probabilities.js	2012-10-15 10:45:52 UTC (rev 4366)
+++ branches/release_branch_0.6.0/rkward/plugins/distributions/cauchy_probabilities.js	2012-10-15 10:58:42 UTC (rev 4367)
@@ -2,7 +2,7 @@
 var q;
 
 function calculate () {
-	q = "c (" + getValue ("q").replace (/[, ]+/g, ", ") + ")";
+	q = "c (" + getString ("q").replace (/[, ]+/g, ", ") + ")";
 
 	echo ('result <- (pcauchy (q = ' + q + ', location = ' + getValue ("location") + ', scale = ' + getValue ("scale") + ', ' + getValue ("tail") + ', ' + getValue("logp") + '))\n');
 }

Modified: branches/release_branch_0.6.0/rkward/plugins/distributions/cauchy_quantiles.js
===================================================================
--- branches/release_branch_0.6.0/rkward/plugins/distributions/cauchy_quantiles.js	2012-10-15 10:45:52 UTC (rev 4366)
+++ branches/release_branch_0.6.0/rkward/plugins/distributions/cauchy_quantiles.js	2012-10-15 10:58:42 UTC (rev 4367)
@@ -2,7 +2,7 @@
 var p;
 
 function calculate () {
-	p = "c (" + getValue ("p").replace (/[, ]+/g, ", ") + ")";
+	p = "c (" + getString ("p").replace (/[, ]+/g, ", ") + ")";
 
 	echo ('result <- (qcauchy (p = ' + p + ', location = ' + getValue ("location") + ', scale = ' + getValue ("scale") + ', ' + getValue ("tail") + ', ' + getValue("logp") + '))\n');
 }

Modified: branches/release_branch_0.6.0/rkward/plugins/distributions/chi_squared_probabilities.js
===================================================================
--- branches/release_branch_0.6.0/rkward/plugins/distributions/chi_squared_probabilities.js	2012-10-15 10:45:52 UTC (rev 4366)
+++ branches/release_branch_0.6.0/rkward/plugins/distributions/chi_squared_probabilities.js	2012-10-15 10:58:42 UTC (rev 4367)
@@ -2,7 +2,7 @@
 var q;
 
 function calculate () {
-	q = "c (" + getValue ("q").replace (/[, ]+/g, ", ") + ")";
+	q = "c (" + getString ("q").replace (/[, ]+/g, ", ") + ")";
 
 	echo ('result <- (pchisq (q = ' + q + ', df = ' + getValue ("df") + ',  ncp = ' + getValue ("ncp") + ', ' + getValue ("tail") + ', ' + getValue ("logp") + '))\n');
 }

Modified: branches/release_branch_0.6.0/rkward/plugins/distributions/chi_squared_quantiles.js
===================================================================
--- branches/release_branch_0.6.0/rkward/plugins/distributions/chi_squared_quantiles.js	2012-10-15 10:45:52 UTC (rev 4366)
+++ branches/release_branch_0.6.0/rkward/plugins/distributions/chi_squared_quantiles.js	2012-10-15 10:58:42 UTC (rev 4367)
@@ -2,7 +2,7 @@
 var p;
 
 function calculate () {
-	p = "c (" + getValue ("p").replace (/[, ]+/g, ", ") + ")";
+	p = "c (" + getString ("p").replace (/[, ]+/g, ", ") + ")";
 
 	echo ('result <- (qchisq (p = ' + p + ', df = ' + getValue ("df") + ', ncp = ' + getValue ("ncp") + ', ' + getValue ("tail") + ', ' + getValue ("logp") + '))\n');
 }

Modified: branches/release_branch_0.6.0/rkward/plugins/distributions/exponential_probabilities.js
===================================================================
--- branches/release_branch_0.6.0/rkward/plugins/distributions/exponential_probabilities.js	2012-10-15 10:45:52 UTC (rev 4366)
+++ branches/release_branch_0.6.0/rkward/plugins/distributions/exponential_probabilities.js	2012-10-15 10:58:42 UTC (rev 4367)
@@ -2,7 +2,7 @@
 var q;
 
 function calculate () {
-	q = "c (" + getValue ("q").replace (/[, ]+/g, ", ") + ")";
+	q = "c (" + getString ("q").replace (/[, ]+/g, ", ") + ")";
 
 	echo ('result <- (pexp (q = ' + q + ', rate = ' + getValue ("rate") + ', ' + getValue ("tail") + ', ' + getValue("logp") + '))\n');
 }

Modified: branches/release_branch_0.6.0/rkward/plugins/distributions/exponential_quantiles.js
===================================================================
--- branches/release_branch_0.6.0/rkward/plugins/distributions/exponential_quantiles.js	2012-10-15 10:45:52 UTC (rev 4366)
+++ branches/release_branch_0.6.0/rkward/plugins/distributions/exponential_quantiles.js	2012-10-15 10:58:42 UTC (rev 4367)
@@ -2,7 +2,7 @@
 var p;
 
 function calculate () {
-	p = "c (" + getValue ("p").replace (/[, ]+/g, ", ") + ")";
+	p = "c (" + getString ("p").replace (/[, ]+/g, ", ") + ")";
 
 	echo ('result <- (qexp (p = ' + p + ', rate = ' + getValue ("rate") + ', ' + getValue ("tail") + ', ' + getValue("logp") + '))\n');
 }

Modified: branches/release_branch_0.6.0/rkward/plugins/distributions/f_probabilities.js
===================================================================
--- branches/release_branch_0.6.0/rkward/plugins/distributions/f_probabilities.js	2012-10-15 10:45:52 UTC (rev 4366)
+++ branches/release_branch_0.6.0/rkward/plugins/distributions/f_probabilities.js	2012-10-15 10:58:42 UTC (rev 4367)
@@ -2,7 +2,7 @@
 var q;
 
 function calculate () {
-	q = "c (" + getValue ("q").replace (/[, ]+/g, ", ") + ")";
+	q = "c (" + getString ("q").replace (/[, ]+/g, ", ") + ")";
 
 	echo ('result <- (pf (q = ' + q + ', df1 = ' + getValue ("df1") + ', df2 = ' + getValue ("df2") + ',  ncp = ' + getValue ("ncp") + ', ' + getValue ("tail") + ', ' + getValue("logp") + '))\n');
 }

Modified: branches/release_branch_0.6.0/rkward/plugins/distributions/f_quantiles.js
===================================================================
--- branches/release_branch_0.6.0/rkward/plugins/distributions/f_quantiles.js	2012-10-15 10:45:52 UTC (rev 4366)
+++ branches/release_branch_0.6.0/rkward/plugins/distributions/f_quantiles.js	2012-10-15 10:58:42 UTC (rev 4367)
@@ -2,7 +2,7 @@
 var p;
 
 function calculate () {
-	p = "c (" + getValue ("p").replace (/[, ]+/g, ", ") + ")";
+	p = "c (" + getString ("p").replace (/[, ]+/g, ", ") + ")";
 
 	echo ('result <- (qf (p = ' + p + ', df1 = ' + getValue ("df1") + ', df2 = ' + getValue ("df2") + ', ncp = ' + getValue ("ncp") + ', ' + getValue ("tail") + ', ' + getValue("logp") + '))\n');
 }

Modified: branches/release_branch_0.6.0/rkward/plugins/distributions/gamma_probabilities.js
===================================================================
--- branches/release_branch_0.6.0/rkward/plugins/distributions/gamma_probabilities.js	2012-10-15 10:45:52 UTC (rev 4366)
+++ branches/release_branch_0.6.0/rkward/plugins/distributions/gamma_probabilities.js	2012-10-15 10:58:42 UTC (rev 4367)
@@ -2,7 +2,7 @@
 var q;
 
 function calculate () {
-	q = "c (" + getValue ("q").replace (/[, ]+/g, ", ") + ")";
+	q = "c (" + getString ("q").replace (/[, ]+/g, ", ") + ")";
 
 	echo ('result <- (pgamma (q = ' + q + ', shape = ' + getValue ("shape") + ', rate = ' + getValue ("rate") + ', ' + getValue ("tail") + ', ' + getValue("logp") + '))\n');
 }

Modified: branches/release_branch_0.6.0/rkward/plugins/distributions/gamma_quantiles.js
===================================================================
--- branches/release_branch_0.6.0/rkward/plugins/distributions/gamma_quantiles.js	2012-10-15 10:45:52 UTC (rev 4366)
+++ branches/release_branch_0.6.0/rkward/plugins/distributions/gamma_quantiles.js	2012-10-15 10:58:42 UTC (rev 4367)
@@ -2,7 +2,7 @@
 var p;
 
 function calculate () {
-	p = "c (" + getValue ("p").replace (/[, ]+/g, ", ") + ")";
+	p = "c (" + getString ("p").replace (/[, ]+/g, ", ") + ")";
 
 	echo ('result <- (qgamma (p = ' + p + ', shape = ' + getValue ("shape") + ', rate = ' + getValue ("rate") + ', ' + getValue ("tail") + ', ' + getValue("logp") + '))\n');
 	echo ('\n');

Modified: branches/release_branch_0.6.0/rkward/plugins/distributions/geom_probabilities.js
===================================================================
--- branches/release_branch_0.6.0/rkward/plugins/distributions/geom_probabilities.js	2012-10-15 10:45:52 UTC (rev 4366)
+++ branches/release_branch_0.6.0/rkward/plugins/distributions/geom_probabilities.js	2012-10-15 10:58:42 UTC (rev 4367)
@@ -2,7 +2,7 @@
 var q;
 
 function calculate () {
-	q = "c (" + getValue ("q").replace (/[, ]+/g, ", ") + ")";
+	q = "c (" + getString ("q").replace (/[, ]+/g, ", ") + ")";
 
 	echo ('result <- (pgeom (q = ' + q + ', prob = ' + getValue ("prob") + ', ' + getValue ("tail") + ', ' + getValue("logp") + '))\n');
 }

Modified: branches/release_branch_0.6.0/rkward/plugins/distributions/geom_quantiles.js
===================================================================
--- branches/release_branch_0.6.0/rkward/plugins/distributions/geom_quantiles.js	2012-10-15 10:45:52 UTC (rev 4366)
+++ branches/release_branch_0.6.0/rkward/plugins/distributions/geom_quantiles.js	2012-10-15 10:58:42 UTC (rev 4367)
@@ -2,7 +2,7 @@
 var p;
 
 function calculate () {
-	p = "c (" + getValue ("p").replace (/[, ]+/g, ", ") + ")";
+	p = "c (" + getString ("p").replace (/[, ]+/g, ", ") + ")";
 
 	echo ('result <- (qgeom (p = ' + p + ', prob = ' + getValue ("prob") + ', ' + getValue ("tail") + ', ' + getValue("logp") + '))\n');
 }

Modified: branches/release_branch_0.6.0/rkward/plugins/distributions/gumbel_probabilities.js
===================================================================
--- branches/release_branch_0.6.0/rkward/plugins/distributions/gumbel_probabilities.js	2012-10-15 10:45:52 UTC (rev 4366)
+++ branches/release_branch_0.6.0/rkward/plugins/distributions/gumbel_probabilities.js	2012-10-15 10:58:42 UTC (rev 4367)
@@ -2,7 +2,7 @@
 var q;
 
 function calculate () {
-	q = "c (" + getValue ("q").replace (/[, ]+/g, ", ") + ")";
+	q = "c (" + getString ("q").replace (/[, ]+/g, ", ") + ")";
 
 	echo ('result <- (pweibull (q = exp(' + q + '), shape = ' + getValue ("shape") + ', scale = ' + getValue ("scale") + ', ' + getValue ("tail") + ', ' + getValue("logp") + '))\n');
 }

Modified: branches/release_branch_0.6.0/rkward/plugins/distributions/gumbel_quantiles.js
===================================================================
--- branches/release_branch_0.6.0/rkward/plugins/distributions/gumbel_quantiles.js	2012-10-15 10:45:52 UTC (rev 4366)
+++ branches/release_branch_0.6.0/rkward/plugins/distributions/gumbel_quantiles.js	2012-10-15 10:58:42 UTC (rev 4367)
@@ -2,7 +2,7 @@
 var p;
 
 function calculate () {
-	p = "c (" + getValue ("p").replace (/[, ]+/g, ", ") + ")";
+	p = "c (" + getString ("p").replace (/[, ]+/g, ", ") + ")";
 
 	echo ('result <- log(qweibull (p = ' + p + ', shape = ' + getValue ("shape") + ', scale = ' + getValue ("scale") + ', ' + getValue ("tail") + ', ' + getValue("logp") + '))\n');
 }

Modified: branches/release_branch_0.6.0/rkward/plugins/distributions/hypergeometric_probabilities.js
===================================================================
--- branches/release_branch_0.6.0/rkward/plugins/distributions/hypergeometric_probabilities.js	2012-10-15 10:45:52 UTC (rev 4366)
+++ branches/release_branch_0.6.0/rkward/plugins/distributions/hypergeometric_probabilities.js	2012-10-15 10:58:42 UTC (rev 4367)
@@ -2,7 +2,7 @@
 var q;
 
 function calculate () {
-	q = "c (" + getValue ("q").replace (/[, ]+/g, ", ") + ")";
+	q = "c (" + getString ("q").replace (/[, ]+/g, ", ") + ")";
 
 	echo ('result <- (phyper (q = ' + q + ', m = ' + getValue ("m") + ', n = ' + getValue ("n") + ', k = ' + getValue ("k") + ', ' + getValue ("tail") + ', ' + getValue("logp") + '))\n');
 }

Modified: branches/release_branch_0.6.0/rkward/plugins/distributions/hypergeometric_quantiles.js
===================================================================
--- branches/release_branch_0.6.0/rkward/plugins/distributions/hypergeometric_quantiles.js	2012-10-15 10:45:52 UTC (rev 4366)
+++ branches/release_branch_0.6.0/rkward/plugins/distributions/hypergeometric_quantiles.js	2012-10-15 10:58:42 UTC (rev 4367)
@@ -2,7 +2,7 @@
 var p;
 
 function calculate () {
-	p = "c (" + getValue ("p").replace (/[, ]+/g, ", ") + ")";
+	p = "c (" + getString ("p").replace (/[, ]+/g, ", ") + ")";
 
 	echo ('result <- (qhyper (p = ' + p + ', m = ' + getValue ("m") + ', n = ' + getValue ("n") + ', k = ' + getValue ("k") + ', ' + getValue ("tail") + ', ' + getValue("logp") + '))\n');
 }

Modified: branches/release_branch_0.6.0/rkward/plugins/distributions/log_normal_probabilities.js
===================================================================
--- branches/release_branch_0.6.0/rkward/plugins/distributions/log_normal_probabilities.js	2012-10-15 10:45:52 UTC (rev 4366)
+++ branches/release_branch_0.6.0/rkward/plugins/distributions/log_normal_probabilities.js	2012-10-15 10:58:42 UTC (rev 4367)
@@ -2,7 +2,7 @@
 var q;
 
 function calculate () {
-	q = "c (" + getValue ("q").replace (/[, ]+/g, ", ") + ")";
+	q = "c (" + getString ("q").replace (/[, ]+/g, ", ") + ")";
 
 	echo ('result <- (plnorm (q = ' + q + ', meanlog = ' + getValue ("meanlog") + ', sdlog = ' + getValue ("sdlog") + ', ' + getValue ("tail") + ', ' + getValue ("logp") + '))\n');
 }

Modified: branches/release_branch_0.6.0/rkward/plugins/distributions/log_normal_quantiles.js
===================================================================
--- branches/release_branch_0.6.0/rkward/plugins/distributions/log_normal_quantiles.js	2012-10-15 10:45:52 UTC (rev 4366)
+++ branches/release_branch_0.6.0/rkward/plugins/distributions/log_normal_quantiles.js	2012-10-15 10:58:42 UTC (rev 4367)
@@ -2,7 +2,7 @@
 var p;
 
 function calculate () {
-	p = "c (" + getValue ("p").replace (/[, ]+/g, ", ") + ")";
+	p = "c (" + getString ("p").replace (/[, ]+/g, ", ") + ")";
 
 	echo ('result <- (qlnorm (p = ' + p + ', meanlog = ' + getValue ("meanlog") + ', sdlog = ' + getValue ("sdlog") + ', ' + getValue ("tail") + ', ' + getValue ("logp") + '))\n');
 }

Modified: branches/release_branch_0.6.0/rkward/plugins/distributions/logistic_probabilities.js
===================================================================
--- branches/release_branch_0.6.0/rkward/plugins/distributions/logistic_probabilities.js	2012-10-15 10:45:52 UTC (rev 4366)
+++ branches/release_branch_0.6.0/rkward/plugins/distributions/logistic_probabilities.js	2012-10-15 10:58:42 UTC (rev 4367)
@@ -2,7 +2,7 @@
 var q;
 
 function calculate () {
-	q = "c (" + getValue ("q").replace (/[, ]+/g, ", ") + ")";
+	q = "c (" + getString ("q").replace (/[, ]+/g, ", ") + ")";
 
 	echo ('result <- (plogis (q = ' + q + ', location = ' + getValue ("location") + ', scale = ' + getValue ("scale") + ', ' + getValue ("tail") + ', ' + getValue("logp") + '))\n');
 }

Modified: branches/release_branch_0.6.0/rkward/plugins/distributions/logistic_quantiles.js
===================================================================
--- branches/release_branch_0.6.0/rkward/plugins/distributions/logistic_quantiles.js	2012-10-15 10:45:52 UTC (rev 4366)
+++ branches/release_branch_0.6.0/rkward/plugins/distributions/logistic_quantiles.js	2012-10-15 10:58:42 UTC (rev 4367)
@@ -2,7 +2,7 @@
 var p;
 
 function calculate () {
-	p = "c (" + getValue ("p").replace (/[, ]+/g, ", ") + ")";
+	p = "c (" + getString ("p").replace (/[, ]+/g, ", ") + ")";
 
 	echo ('result <- (qlogis (p = ' + p + ', location = ' + getValue ("location") + ', scale = ' + getValue ("scale") + ', ' + getValue ("tail") + ', ' + getValue("logp") + '))\n');
 }

Modified: branches/release_branch_0.6.0/rkward/plugins/distributions/negative_binomial_probabilities.js
===================================================================
--- branches/release_branch_0.6.0/rkward/plugins/distributions/negative_binomial_probabilities.js	2012-10-15 10:45:52 UTC (rev 4366)
+++ branches/release_branch_0.6.0/rkward/plugins/distributions/negative_binomial_probabilities.js	2012-10-15 10:58:42 UTC (rev 4367)
@@ -2,7 +2,7 @@
 var q;
 
 function calculate () {
-	q = "c (" + getValue ("q").replace (/[, ]+/g, ", ") + ")";
+	q = "c (" + getString ("q").replace (/[, ]+/g, ", ") + ")";
 
 	echo ('result <- (pnbinom (q = ' + q + ', size = ' + getValue ("size") + ', prob = ' + getValue ("prob") + ', ' + getValue ("tail") + ', ' + getValue("logp") + '))\n');
 }

Modified: branches/release_branch_0.6.0/rkward/plugins/distributions/negative_binomial_quantiles.js
===================================================================
--- branches/release_branch_0.6.0/rkward/plugins/distributions/negative_binomial_quantiles.js	2012-10-15 10:45:52 UTC (rev 4366)
+++ branches/release_branch_0.6.0/rkward/plugins/distributions/negative_binomial_quantiles.js	2012-10-15 10:58:42 UTC (rev 4367)
@@ -2,7 +2,7 @@
 var p;
 
 function calculate () {
-	p = "c (" + getValue ("p").replace (/[, ]+/g, ", ") + ")";
+	p = "c (" + getString ("p").replace (/[, ]+/g, ", ") + ")";
 
 	echo ('result <- (qnbinom (p = ' + p + ', size = ' + getValue ("size") + ', prob = ' + getValue ("prob") + ', ' + getValue ("tail") + ', ' + getValue("logp") + '))\n');
 }

Modified: branches/release_branch_0.6.0/rkward/plugins/distributions/normal_probabilities.js
===================================================================
--- branches/release_branch_0.6.0/rkward/plugins/distributions/normal_probabilities.js	2012-10-15 10:45:52 UTC (rev 4366)
+++ branches/release_branch_0.6.0/rkward/plugins/distributions/normal_probabilities.js	2012-10-15 10:58:42 UTC (rev 4367)
@@ -2,7 +2,7 @@
 var q;
 
 function calculate () {
-	q = "c (" + getValue ("q").replace (/[, ]+/g, ", ") + ")";
+	q = "c (" + getString ("q").replace (/[, ]+/g, ", ") + ")";
 
 	echo ('result <- (pnorm (q = ' + q + ', mean = ' + getValue ("mean") + ', sd = ' + getValue ("sd") + ', ' + getValue ("tail") + ', ' + getValue ("logp") + '))\n');
 }

Modified: branches/release_branch_0.6.0/rkward/plugins/distributions/normal_quantiles.js
===================================================================
--- branches/release_branch_0.6.0/rkward/plugins/distributions/normal_quantiles.js	2012-10-15 10:45:52 UTC (rev 4366)
+++ branches/release_branch_0.6.0/rkward/plugins/distributions/normal_quantiles.js	2012-10-15 10:58:42 UTC (rev 4367)
@@ -2,7 +2,7 @@
 var p;
 
 function calculate () {
-	p = "c (" + getValue ("p").replace (/[, ]+/g, ", ") + ")";
+	p = "c (" + getString ("p").replace (/[, ]+/g, ", ") + ")";
 
 	echo ('result <- (qnorm (p = ' + p + ', mean = ' + getValue ("mean") + ', sd = ' + getValue ("sd") + ', ' + getValue ("tail") + ', ' + getValue ("logp") + '))\n');
 }

Modified: branches/release_branch_0.6.0/rkward/plugins/distributions/poisson_probabilities.js
===================================================================
--- branches/release_branch_0.6.0/rkward/plugins/distributions/poisson_probabilities.js	2012-10-15 10:45:52 UTC (rev 4366)
+++ branches/release_branch_0.6.0/rkward/plugins/distributions/poisson_probabilities.js	2012-10-15 10:58:42 UTC (rev 4367)
@@ -2,7 +2,7 @@
 var q;
 
 function calculate () {
-	q = "c (" + getValue ("q").replace (/[, ]+/g, ", ") + ")";
+	q = "c (" + getString ("q").replace (/[, ]+/g, ", ") + ")";
 
 	echo ('result <- (ppois (q = ' + q + ', lambda = ' + getValue ("lambda") + ', ' + getValue ("tail") + ', ' + getValue("logp") + '))\n');
 }

Modified: branches/release_branch_0.6.0/rkward/plugins/distributions/poisson_quantiles.js
===================================================================
--- branches/release_branch_0.6.0/rkward/plugins/distributions/poisson_quantiles.js	2012-10-15 10:45:52 UTC (rev 4366)
+++ branches/release_branch_0.6.0/rkward/plugins/distributions/poisson_quantiles.js	2012-10-15 10:58:42 UTC (rev 4367)
@@ -2,7 +2,7 @@
 var p;
 
 function calculate () {
-	p = "c (" + getValue ("p").replace (/[, ]+/g, ", ") + ")";
+	p = "c (" + getString ("p").replace (/[, ]+/g, ", ") + ")";
 
 	echo ('result <- (qpois (p = ' + p + ', lambda = ' + getValue ("lambda") + ', ' + getValue ("tail") + ', ' + getValue("logp") + '))\n');
 }

Modified: branches/release_branch_0.6.0/rkward/plugins/distributions/t_probabilities.js
===================================================================
--- branches/release_branch_0.6.0/rkward/plugins/distributions/t_probabilities.js	2012-10-15 10:45:52 UTC (rev 4366)
+++ branches/release_branch_0.6.0/rkward/plugins/distributions/t_probabilities.js	2012-10-15 10:58:42 UTC (rev 4367)
@@ -2,7 +2,7 @@
 var q;
 
 function calculate () {
-	q = "c (" + getValue ("q").replace (/[, ]+/g, ", ") + ")";
+	q = "c (" + getString ("q").replace (/[, ]+/g, ", ") + ")";
 
 	echo ('result <- (pt (q = ' + q + ', df = ' + getValue ("df") + ', ncp = ' + getValue ("ncp") + ', ' + getValue ("tail") + ', ' + getValue("logp") + '))\n');
 }

Modified: branches/release_branch_0.6.0/rkward/plugins/distributions/t_quantiles.js
===================================================================
--- branches/release_branch_0.6.0/rkward/plugins/distributions/t_quantiles.js	2012-10-15 10:45:52 UTC (rev 4366)
+++ branches/release_branch_0.6.0/rkward/plugins/distributions/t_quantiles.js	2012-10-15 10:58:42 UTC (rev 4367)
@@ -2,7 +2,7 @@
 var p;
 
 function calculate () {
-	p = "c (" + getValue ("p").replace (/[, ]+/g, ", ") + ")";
+	p = "c (" + getString ("p").replace (/[, ]+/g, ", ") + ")";
 
 	echo ('result <- (qt (p = ' + p + ', df = ' + getValue ("df") + ', ncp = ' + getValue ("ncp") + ', ' + getValue ("tail") + ', ' + getValue ("logp") + '))\n');
 }

Modified: branches/release_branch_0.6.0/rkward/plugins/distributions/tukey_probabilities.js
===================================================================
--- branches/release_branch_0.6.0/rkward/plugins/distributions/tukey_probabilities.js	2012-10-15 10:45:52 UTC (rev 4366)
+++ branches/release_branch_0.6.0/rkward/plugins/distributions/tukey_probabilities.js	2012-10-15 10:58:42 UTC (rev 4367)
@@ -2,7 +2,7 @@
 var q;
 
 function calculate () {
-	q = "c (" + getValue ("q").replace (/[, ]+/g, ", ") + ")";
+	q = "c (" + getString ("q").replace (/[, ]+/g, ", ") + ")";
 
 	echo ('result <- (ptukey (q = ' + q + ', nmeans = ' + getValue ("nmeans") + ', df = ' + getValue ("df") + ', nranges = ' + getValue ("nranges") + ', ' + getValue ("tail") + ', ' + getValue ("logp") + '))\n');
 }

Modified: branches/release_branch_0.6.0/rkward/plugins/distributions/tukey_quantiles.js
===================================================================
--- branches/release_branch_0.6.0/rkward/plugins/distributions/tukey_quantiles.js	2012-10-15 10:45:52 UTC (rev 4366)
+++ branches/release_branch_0.6.0/rkward/plugins/distributions/tukey_quantiles.js	2012-10-15 10:58:42 UTC (rev 4367)
@@ -2,7 +2,7 @@
 var p;
 
 function calculate () {
-	p = "c (" + getValue ("p").replace (/[, ]+/g, ", ") + ")";
+	p = "c (" + getString ("p").replace (/[, ]+/g, ", ") + ")";
 
 	echo ('result <- (qtukey (p = ' + p + ', nmeans = ' + getValue ("nmeans") + ', df = ' + getValue ("df") + ', nranges = ' + getValue ("nranges") + ', ' + getValue ("tail") + ', ' + getValue ("logp") + '))\n');
 }

Modified: branches/release_branch_0.6.0/rkward/plugins/distributions/uniform_probabilities.js
===================================================================
--- branches/release_branch_0.6.0/rkward/plugins/distributions/uniform_probabilities.js	2012-10-15 10:45:52 UTC (rev 4366)
+++ branches/release_branch_0.6.0/rkward/plugins/distributions/uniform_probabilities.js	2012-10-15 10:58:42 UTC (rev 4367)
@@ -2,7 +2,7 @@
 var q;
 
 function calculate () {
-	q = "c (" + getValue ("q").replace (/[, ]+/g, ", ") + ")";
+	q = "c (" + getString ("q").replace (/[, ]+/g, ", ") + ")";
 
 	echo ('result <- (punif (q = ' + q + ', min = ' + getValue ("min") + ', max = ' + getValue ("max") + ', ' + getValue ("tail") + ', ' + getValue("logp") + '))\n');
 }

Modified: branches/release_branch_0.6.0/rkward/plugins/distributions/uniform_quantiles.js
===================================================================
--- branches/release_branch_0.6.0/rkward/plugins/distributions/uniform_quantiles.js	2012-10-15 10:45:52 UTC (rev 4366)
+++ branches/release_branch_0.6.0/rkward/plugins/distributions/uniform_quantiles.js	2012-10-15 10:58:42 UTC (rev 4367)
@@ -2,7 +2,7 @@
 var p;
 
 function calculate () {
-	p = "c (" + getValue ("p").replace (/[, ]+/g, ", ") + ")";
+	p = "c (" + getString ("p").replace (/[, ]+/g, ", ") + ")";
 
 	echo ('result <- (qunif (p = ' + p + ', min = ' + getValue ("min") + ', max = ' + getValue ("max") + ', ' + getValue ("tail") + ', ' + getValue("logp") + '))\n');
 }

Modified: branches/release_branch_0.6.0/rkward/plugins/distributions/weibull_probabilities.js
===================================================================
--- branches/release_branch_0.6.0/rkward/plugins/distributions/weibull_probabilities.js	2012-10-15 10:45:52 UTC (rev 4366)
+++ branches/release_branch_0.6.0/rkward/plugins/distributions/weibull_probabilities.js	2012-10-15 10:58:42 UTC (rev 4367)
@@ -2,7 +2,7 @@
 var q;
 
 function calculate () {
-	q = "c (" + getValue ("q").replace (/[, ]+/g, ", ") + ")";
+	q = "c (" + getString ("q").replace (/[, ]+/g, ", ") + ")";
 
 	echo ('result <- (pweibull (q = ' + q + ', shape = ' + getValue ("shape") + ', scale = ' + getValue ("scale") + ', ' + getValue ("tail") + ', ' + getValue("logp") + '))\n');
 }

Modified: branches/release_branch_0.6.0/rkward/plugins/distributions/weibull_quantiles.js
===================================================================
--- branches/release_branch_0.6.0/rkward/plugins/distributions/weibull_quantiles.js	2012-10-15 10:45:52 UTC (rev 4366)
+++ branches/release_branch_0.6.0/rkward/plugins/distributions/weibull_quantiles.js	2012-10-15 10:58:42 UTC (rev 4367)
@@ -2,7 +2,7 @@
 var p;
 
 function calculate () {
-	p = "c (" + getValue ("p").replace (/[, ]+/g, ", ") + ")";
+	p = "c (" + getString ("p").replace (/[, ]+/g, ", ") + ")";
 
 	echo ('result <- (qweibull (p = ' + p + ', shape = ' + getValue ("shape") + ', scale = ' + getValue ("scale") + ', ' + getValue ("tail") + ', ' + getValue("logp") + '))\n');
 }

Modified: branches/release_branch_0.6.0/rkward/plugins/distributions/wilcoxon_probabilities.js
===================================================================
--- branches/release_branch_0.6.0/rkward/plugins/distributions/wilcoxon_probabilities.js	2012-10-15 10:45:52 UTC (rev 4366)
+++ branches/release_branch_0.6.0/rkward/plugins/distributions/wilcoxon_probabilities.js	2012-10-15 10:58:42 UTC (rev 4367)
@@ -2,7 +2,7 @@
 var q;
 
 function calculate () {
-	q = "c (" + getValue ("q").replace (/[, ]+/g, ", ") + ")";
+	q = "c (" + getString ("q").replace (/[, ]+/g, ", ") + ")";
 
 	echo ('result <- (pwilcox (q = ' + q + ', m = ' + getValue ("m") + ', n = ' + getValue ("n") + ', ' + getValue ("tail") + ', ' + getValue("logp") + '))\n');
 }

Modified: branches/release_branch_0.6.0/rkward/plugins/distributions/wilcoxon_quantiles.js
===================================================================
--- branches/release_branch_0.6.0/rkward/plugins/distributions/wilcoxon_quantiles.js	2012-10-15 10:45:52 UTC (rev 4366)
+++ branches/release_branch_0.6.0/rkward/plugins/distributions/wilcoxon_quantiles.js	2012-10-15 10:58:42 UTC (rev 4367)
@@ -2,7 +2,7 @@
 var p;
 
 function calculate () {
-	p = "c (" + getValue ("p").replace (/[, ]+/g, ", ") + ")";
+	p = "c (" + getString ("p").replace (/[, ]+/g, ", ") + ")";
 
 	echo ('result <- (qwilcox (p = ' + p + ', m = ' + getValue ("m") + ', n = ' + getValue ("n") + ', ' + getValue ("tail") + ', ' + getValue("logp") + '))\n');
 }

Modified: branches/release_branch_0.6.0/rkward/scriptbackends/common.js
===================================================================
--- branches/release_branch_0.6.0/rkward/scriptbackends/common.js	2012-10-15 10:45:52 UTC (rev 4366)
+++ branches/release_branch_0.6.0/rkward/scriptbackends/common.js	2012-10-15 10:58:42 UTC (rev 4367)
@@ -48,6 +48,11 @@
 	return (_RK_backend.getValue (id));
 }
 
+getString = function (id) {
+	// getValue() sometimes returns numeric results (whenever the value is "0"). This variant always returns strings.
+	return (getValue (id).toString ());
+}
+
 printValue = function (id) {
 	echo (getValue (id));
 }

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





More information about the rkward-tracker mailing list