しむて - 経済統計練習帳

var y = new Array();
var x = new Array();
var z = new Array();
var f = new Array();
 
function sample() {
 
        var query = "SELECT * FROM " +
            '1yXxOwb6QpmfvmKSBcx27MoaKcc55CdphuEdsjEQD';
        var encodedQuery = encodeURIComponent(query);
 
        var url = ['https://www.googleapis.com/fusiontables/v1/query'];
        url.push('?sql=' + encodedQuery);
        url.push('&key=AIzaSyAH0WCAXRIdHdbI-6bnMSN4kVDDZZmGyqY');
        url.push('&callback=?');
 
 
 
 
 
        $.ajax({
            url: url.join(''),
            dataType: 'jsonp',
            success: function (data) {
                var rows = data['rows'];
 
 
 
                sx = 0;
 
 
 
 
 
                for (var i in rows) {
                    sx = sx + 1;
                    x[sx] = rows[i][0] / 1;
 
                }
 
                number = sx;
 
 
 
 play();
 
 
 
 
 
 
 
 
 
 
 
 
            }
        });
 
}
 
function play(){
 
x1=0;
for(s=1;s<13;s++){
x1=x1+x[s];
}
 
 
c2=0;
for(s=1;s<13;s++){
c2=c2+(x[s]/x1-1/12)*(x[s]/x1-1/12);
}
 
 
var pin=new Array();
var c=new Array();
 
for(tr=1;tr<10001;tr++){
 
for(s=1;s<13;s++){
pin[s]=0;    
}
 
for(s=1;s<x1+1;s++){
n1=12*Math.random();
n2=Math.floor(n1)+1;
pin[n2]=pin[n2]+1;
}
 
c1=0;
for(s=1;s<13;s++){
c1=c1+(pin[s]/x1-0.081)*(pin[s]/x1-0.081);
}
 
 
 
c[tr]=c1;
}
 
 
z=0;
for(s=1;s<10001;s++){
if(c[s]>c2)z=z+1;
}
 
$("#memo").html(z);
 
 
}