[Genabel-commits] r672 - pkg/VariABEL/src

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

Author: maksim
Date: 2011-03-07 11:48:24 +0100 (Mon, 07 Mar 2011)
New Revision: 672

Modified:
   pkg/VariABEL/src/var_homogeneity_test_C.cpp
Log:
add ITERlib

Modified: pkg/VariABEL/src/var_homogeneity_test_C.cpp
===================================================================
--- pkg/VariABEL/src/var_homogeneity_test_C.cpp	2011-03-07 10:46:14 UTC (rev 671)
+++ pkg/VariABEL/src/var_homogeneity_test_C.cpp	2011-03-07 10:48:24 UTC (rev 672)
@@ -202,7 +202,6 @@
 
  	double betas_disp[2], se_disp[2];
 
-	std::cout<<"1\n";
 	for(int i=0; i<nids ; i++) {residuals[i] = residuals[i]*residuals[i];}
 	linear_regression(
 				        /*input variables:*/     residuals, design_matrix_copy, &p_disp, &nids_nona,
@@ -216,15 +215,10 @@
 //	for(int i=0 ; i<p ; i++) {std::cout<<"betas["<<i<<"]="<<betas[i]<<", se["<<i<<"]="<<se[i]<<"\n";}
 
 
-	std::cout<<"2\n";
 	*chi2 = (betas_disp[1]/se_disp[1])*(betas_disp[1]/se_disp[1]);
-	std::cout<<"3\n";
 	*df = 1;
-	std::cout<<"4\n";
 	betas[p] = betas_disp[1];
-	std::cout<<"5\n";
   se[p]	   = se_disp[1];
-	std::cout<<"6\n";
 	
 	}