[rkward-cvs] SF.net SVN: rkward: [1496] trunk/rkward/rkward/plugins/analysis/moments/ skewness_kurtosis_test.php

[tfry at users.sourceforge.net]

Revision: 1496
          http://svn.sourceforge.net/rkward/?rev=1496&view=rev
Author:   tfry
Date:     2007-02-27 06:39:42 -0800 (Tue, 27 Feb 2007)

Log Message:
-----------
Fix indentation of generated code

Modified Paths:
--------------
    trunk/rkward/rkward/plugins/analysis/moments/skewness_kurtosis_test.php

Modified: trunk/rkward/rkward/plugins/analysis/moments/skewness_kurtosis_test.php
===================================================================
--- trunk/rkward/rkward/plugins/analysis/moments/skewness_kurtosis_test.php	2007-02-27 14:35:24 UTC (rev 1495)
+++ trunk/rkward/rkward/plugins/analysis/moments/skewness_kurtosis_test.php	2007-02-27 14:39:42 UTC (rev 1496)
@@ -16,25 +16,25 @@
 for (var in rk.temp.objects) {
 	i = i+1
 	rk.temp.results$'Variable Name'[i] <- rk.get.description (var, is.substitute=TRUE)
-	<? 
+<?
 	if (getRK_val ("skewness")) { ?>
 	try (rk.temp.results$'Skewness'[i] <- skewness (eval (var)<? echo ($narm); ?>))
-	<? }
+<?	}
 	if (getRK_val ("kurtosis")) { ?>
 	try ({
 		rk.temp.results$'Kurtosis'[i] <- kurtosis (eval (var)<? echo ($narm); ?>)
 		rk.temp.results$'Excess Kurtosis'[i] <- rk.temp.results$'Kurtosis'[i] - 3
 	})
-	<? }
+<?	}
 	if (getRK_val ("geary")) { ?>
 	try (rk.temp.results$'Geary kurtosis'[i] <- geary (eval (var)<? echo ($narm); ?>))
-	<? }
+<?	}
 	if (getRK_val ("length")) { ?>
 	try (rk.temp.results$'Length'[i] <- length (eval (var)))
-	<? }
+<?	}
 	if (getRK_val ("nacount")) { ?>
 	try (rk.temp.results$'NAs'[i] <- length (which(is.na(eval (var)))))
-	<? } ?>
+<?	} ?>
 }
 <?
 }


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