deeiyoi - 経済統計練習帳

var sig,mu;
var th=new Array();
var ps=new Array();
var point=new Array();
var px=new Array();
 
function sample(){
 
 
for(s=1;s<11;s++){
th[s]=0.25+0.05*s;
ps[s]=0.1;
}
 
 
for(s=1;s<11;s++){
f(100,th[s]); 
px[s]=point[45]*ps[s];
}
 
paint(); 
 
}
 
function f(n,p){
 
q =1- p;
 
var a=new Array(); 
var b=new Array(); 
var s,sx,r;
 
a[0] = 1;
a[1] = n;
for (s = 2; s < n + 1;s++ ){
a[s]=a[s-1]*(n-s+1);    
}
 
b[0] = 1;
    b[1] = 1;
    for (s = 2; s < n + 1;s++ ){
    b[s]=b[s-1]*s;    
    }
 
 
  for(r=0;r<n+1;r++){
 
    p1 = 1;
    for (s = 1; s < r + 1;s++ ){
    p1=p1*p;    
    }
 
    for (s = 1; s < n-r + 1;s++ ){
    p1=p1*q;    
    }
 point[r] = a[r] * p1 / b[r];
 }
 
 
 
}
 
 
 
 
function paint(){
 
var sub=new svgpaint();
 
str="<svg width=\"500\" height=\"500\">";
 
 maxp=0;
 for(s=1;s<11;s++){
if(px[s]>maxp)maxp=px[s];  
} 
 
for(s=1;s<11;s++){
c1=500*px[s]/maxp;        
str=str+sub.rect(50*s,500-c1,50,c1,"red");    
} 
str=str+sub.line(0,0,0,500,3,"blue"); 
str=str+sub.line(500,500,0,500,3,"blue"); 
 
 
 
str=str+"</svg>";
 
$("#memo").html(str);   
 
}