[Forensim-help] r121 - pkg/R

[noreply at r-forge.r-project.org]

Author: hindahaned
Date: 2009-07-23 17:35:17 +0200 (Thu, 23 Jul 2009)
New Revision: 121

Modified:
   pkg/R/AuxFunc.R
Log:


Modified: pkg/R/AuxFunc.R
===================================================================
--- pkg/R/AuxFunc.R	2009-07-23 15:08:01 UTC (rev 120)
+++ pkg/R/AuxFunc.R	2009-07-23 15:35:17 UTC (rev 121)
@@ -8,7 +8,7 @@
 findmax<-function(vec)
 	{
 	res0<-matrix(0,nrow=2,ncol=1)
-	
+	#res0<-data.frame(res0)
 	if(all(vec==0))
 	{
 		xmax<-0