rannsu - 経済統計練習帳

<script src="//ajax.googleapis.com/ajax/libs/jquery/1.9.1/jquery.min.js"></script>
 
<script>
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);
 
 
 
  } 
</script>
 
 
<script>
 
class svgpaint{
 
chop(strp){
 this.strx="\""+strp+"\"";
 return this.strx;
}
rect(x1,y1,w1,h1,col){
this.strx="<rect x="+this.chop(x1)+"\" y="+this.chop(y1)+"\" width="+this.chop(w1);
this.strx=this.strx+"\" height="+this.chop(h1)+" fill="+this.chop(col)+"/>";
return this.strx;
}
text(x1,y1,size,strp){
this.strx="<text x="+this.chop(x1)+" y= "+this.chop(y1)+" font-size="+this.chop(size)+">";
this.strx=this.strx+strp;
this.strx=this.strx+"</text>";
return this.strx;
}
 
circle(x1,y1,r,col){
this.strx="<circle cx="+this.chop(x1)+"\" cy="+this.chop(y1)+"\" r="+this.chop(r)+" fill="+this.chop(col)+"/>";
return this.strx;
}
line(x1,y1,x2,y2,wide,col){
this.strx="<line x1="+this.chop(x1)+" y1="+this.chop(y1)+" x2="+this.chop(x2)+" y2=";
this.strx=this.strx+this.chop(y2)+"style= \" stroke:"+col+";stroke-width:"+wide+"\"/>";
return this.strx;
}
 
 
 
}
 
</script>