[rkward-cvs] SF.net SVN: rkward: [1753] trunk/rkward/rkward/plugins/analysis/ ansari_bradley/ansari_bradley_test.php

[sjar at users.sourceforge.net]

Revision: 1753
          http://svn.sourceforge.net/rkward/?rev=1753&view=rev
Author:   sjar
Date:     2007-03-29 09:28:21 -0700 (Thu, 29 Mar 2007)

Log Message:
-----------
bug fix for missing parameters:
* estimate of the ratio of scales IF confint is true
* If confint is true show the value in parameters

However, I fell not confident with this plug-in right now because of worse error handling

Modified Paths:
--------------
    trunk/rkward/rkward/plugins/analysis/ansari_bradley/ansari_bradley_test.php

Modified: trunk/rkward/rkward/plugins/analysis/ansari_bradley/ansari_bradley_test.php
===================================================================
--- trunk/rkward/rkward/plugins/analysis/ansari_bradley/ansari_bradley_test.php	2007-03-29 16:18:20 UTC (rev 1752)
+++ trunk/rkward/rkward/plugins/analysis/ansari_bradley/ansari_bradley_test.php	2007-03-29 16:28:21 UTC (rev 1753)
@@ -24,7 +24,7 @@
 	parameters=list (
 		"Comparing", paste (names[1], "against", names[2]),
 		"Alternative Hypothesis", rk.describe.alternative(result),
-		"Compute exact p-value", "<? getRK ("exact"); ?>"))
+		"Compute exact p-value", "<? getRK ("exact"); ?>", <? if (getRK_val ("confint")== "TRUE") {?> "Confidence Level", "<? getRK ("conflevel"); ?>" <?}?>))
 
 rk.results (list (
 	'Variable Names'=names,
@@ -33,7 +33,8 @@
 	p=result$p.value<?
 	if (getRK_val ("confint")== "TRUE") { ?>,
 	'confidence interval percent'=(100 * attr(result$conf.int, "conf.level")),
-	'confidence interval of difference'=result$conf.int<? } ?>))
+	'confidence interval of difference'=result$conf.int<? } ?>,
+	<? if (getRK_val ("confint")== "TRUE") {?> 'estimate of the ratio of scales'=result$estimate<?}?>))
 <?
 }
 ?>


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