cerr<<"Assertion fail for chisquare test : "<<a[0]<<" : "<<a[1]<<" vs "<<b[0]<<" : "<<b[1]<<" => pvalue from function = "<<chisquare(a,b)<<" ; should be 0.53737445246309 "<<endl;
}
nTest++;
if(chisquare_Two(a,b)!=0.53737445246309)
{
cerr<<"Assertion fail for chisquare test : "<<a[0]<<" : "<<a[1]<<" vs "<<b[0]<<" : "<<b[1]<<" => pvalue from function = "<<chisquare_Two(a,b)<<" ; should be 0.53737445246309 "<<endl;