pppp98 - 経済統計練習帳

var x=new Array();
var y=new Array();
var c=new Array();
 
function sample(){
 
var timer;
var delay = 1000;
 
var loop = function () {
 
 
for(s=1;s<10001;s++){
x[s]=randx(50,10);    
}    
 
for(s=1;s<10001;s++){
y[s]=Math.floor(x[s]);  
}    
 
for(s=0;s<101;s++){
c[s]=0;    
}    
 
for(s=1;s<10001;s++){
sx=y[s];
if(sx>0)c[sx]=c[sx]+1;  
}     
 
 
 
paint();    
 
 
clearTimeout(timer);
    timer = setTimeout(loop, delay);
}
 
loop();
 
 
}
 
 
function randx(mu,sig) {
 
 
  pi = Math.PI;
 
  p1 = 0;
  p2 = 0;
 
  x1=Math.random();
  x2=Math.random();
 
  f1=Math.log(x1);
  r=Math.sqrt(-2*f1)*Math.cos(2 * pi * x2);
 
 
 
p3=mu+sig*r;
 
return p3;
 
 
}
 
 
function paint(){
 
      var sub=new svgpaint();
 
str="<svg width=\"700\" height=\"700\">";
for(s=1;s<101;s++){
str=str+sub.rect(5*s,500-c[s],5,c[s],"blue");      
}
    str=str+"</svg>";
$("#memo").html(str);
 
 
 
  }