var my={} function chisquareMain(){var version='0.65';var wd=450;my.rows=[2,2];my.cols=[2,2];var s="";s+='
';s+='
Chi-Square Calculator
';for(var i=0;i<1;i++){s+='
';s+='';s+='';s+='
';s+='
';} s+='
or';s+='';s+='
';s+='
';s+='
Chi-Square:
';s+='';s+='
';s+='
';s+='
Degrees of Freedom:
';s+='';s+='
';s+='
';s+='
p:
';s+='
';s+='
';s+='
';s+='
';s+='
© 2020 MathsIsFun.com v'+version+'
';s+='
';document.write(s);this.isDirtyQ=false;this.resultMat=null;resize(0,2,2);document.getElementById('outTxt').value='209 280\n225 248';parseToA();go();} function chiTable(){var ps=[0.995,0.99,0.975,0.95,0.9,0.5,0.2,0.1,0.05,0.025,0.02,0.01,0.005,0.002,0.001];var s='' s+='' for(var i=0;i<=50;i++){s+='\n' s+='' for(var j=0;j' s+=p s+=''}else{s+=''}} s+='\n'} s+='\n
' s+=i s+='' var chi=critchi(p,i) if(chi<0.02){s+=chi.toPrecision(3)}else{s+=chi.toFixed(3)} s+='
' console.log('s',s)} function cellChg(){console.log("cellChg");document.getElementById('outTxt').value=getMat(0).getFmt();go();} function chiChg(){var s='';var chi2=document.getElementById('chi2').value;s+='Chi-Squared = '+chi2;s+='
';s+='
';var df=document.getElementById('df').value;s+='Degrees of Freedom = '+df;s+='
';s+='
';var p=pochisq(chi2,df);s+='p = '+fmtNum(p,6);document.getElementById('pval').innerHTML=fmtNum(p,4);document.getElementById('result').innerHTML=s;} function go(){var s='';var A=getMat(0);s+='Actual Values:
';s+=A.getHTML();s+='
';s+='
';if(!A.isMinQ(5)){s+="Warning: Actual Value less than 5.";s+='
';s+="Results not reliable.";s+='
';s+='
';} var E=A.expected();s+='Expected Values:
';s+=E.getHTML();s+='
';s+='
';var Chi=A.chiSquare(E);s+='Chi-Squared Values:
';s+=Chi.getHTML();s+='
';s+='
';var chi2=Chi.addCells();s+='Chi-Square = '+fmtNum(chi2,6);s+='
';s+='
';var df=(A.getRows()-1)*(A.getCols()-1);s+='Degrees of Freedom = '+df;s+='
';s+='
';var p=pochisq(chi2,df);s+='p = '+fmtNum(p,6);document.getElementById('chi2').value=fmtNum(chi2,6);document.getElementById('df').value=df;document.getElementById('pval').innerHTML=fmtNum(p,4);document.getElementById('result').innerHTML=s;} function parseNGo(){parseToA();go();} function msg(s){document.getElementById('msg').innerHTML=s;} function getMat(n){var B=new Matrix(my.rows[n],my.cols[n]);for(var i=0;i';} s+='
';} return s;} function Matrix(r,c){this.nrows=r;this.ncols=c;this.mat=[];this.initMe();} Matrix.prototype.initMe=function(){for(var i=0;i0)s+="\n";for(var j=0;j0)s+="
";for(var j=0;j=(Z_MAX*0.5)){x=1.0;}else if(y<1.0){w=y*y;x=((((((((0.000124818987*w- 0.001075204047)*w+0.005198775019)*w- 0.019198292004)*w+0.059054035642)*w- 0.151968751364)*w+0.319152932694)*w- 0.531923007300)*w+0.797884560593)*y*2.0;}else{y-=2.0;x=(((((((((((((-0.000045255659*y+ 0.000152529290)*y-0.000019538132)*y- 0.000676904986)*y+0.001390604284)*y- 0.000794620820)*y-0.002034254874)*y+ 0.006549791214)*y-0.010557625006)*y+ 0.011630447319)*y-0.009279453341)*y+ 0.005353579108)*y-0.002141268741)*y+ 0.000535310849)*y+0.999936657524;}} return z>0.0?((x+1.0)*0.5):((1.0-x)*0.5);} var BIGX=20.0;function ex(x){return(x<-BIGX)?0.0:Math.exp(x);} function pochisq(x,df){var a,y,s;var e,c,z;var even;var LOG_SQRT_PI=0.5723649429247000870717135;var I_SQRT_PI=0.5641895835477562869480795;if(x<=0.0||df<1){return 1.0;} a=0.5*x;even=!(df&1);if(df>1){y=ex(-a);} s=(even?y:(2.0*poz(-Math.sqrt(x))));if(df>2){x=0.5*(df-1.0);z=(even?1.0:0.5);if(a>BIGX){e=(even?0.0:LOG_SQRT_PI);c=Math.log(a);while(z<=x){e=Math.log(z)+e;s+=ex(c*z-a-e);z+=1.0;} return s;}else{e=(even?1.0:(I_SQRT_PI/Math.sqrt(a)));c=0.0;while(z<=x){e=e*(a/z);c=c+e;z+=1.0;} return c*y+s;}}else{return s;}} function critchi(p,df){var CHI_EPSILON=0.000001;var CHI_MAX=99999.0;var minchisq=0.0;var maxchisq=CHI_MAX;var chisqval;if(p<=0.0){return maxchisq;}else{if(p>=1.0){return 0.0;}} chisqval=df/Math.sqrt(p);while((maxchisq-minchisq)>CHI_EPSILON){if(pochisq(chisqval,df)0&&s.indexOf('e')<0){s=s.replace(/0+$/,'');} if(s.charAt(s.length-1)=='.'){s=s.substr(0,s.length-1);} return s;}