んgf - 経済統計練習帳

var ax=new Array();
var ay=new Array();
var bx=new Array();
var by=new Array();
var x=new Array();
var y=new Array();
var x_pol=new Array();
var y_pol=new Array();
var number_pol;
 
 
function sample(){
 
len=30;
h=2*trany(len,60);
 
ax[1]=50;
ay[1]=50;
bx[1]=ax[1]+tranx(len,60)+len;
by[1]=ay[1]+trany(len,60);
 
for(s=2;s<6;s++){    
ax[s]=ax[s-1]+3*len;
bx[s]=bx[s-1]+3*len;
}
 
for(s=2;s<11;s++){    
ay[s]=ay[s-1]+h;
by[s]=by[s-1]+h;
}
 
 
 
 
 
    str = "<svg width=\"700\" height=\"700\">";
 
for (k1 = 1; k1 < 6; k1++) {
for (k2 = 1; k2 <11; k2++) {
 
 
    number_pol = 6;
        for (s = 1; s < number_pol + 1; s++) {
            x_pol[s] = tranx(len, 60 * s)+ax[k1];
            y_pol[s] = trany(len, 60 * s)+ay[k2];
        }
 
 
 
    str = str + poly("blue");
 
}}
 for (k1 = 1; k1 < 6; k1++) {
for (k2 = 1; k2 <11; k2++) {
 
 
    number_pol = 6;
        for (s = 1; s < number_pol + 1; s++) {
            x_pol[s] = tranx(len, 60 * s)+bx[k1];
            y_pol[s] = trany(len, 60 * s)+by[k2];
        }
 
 
 
    str = str + poly("red");
 
}}
 
 
  number_pol = 6;
        for (s = 1; s < number_pol + 1; s++) {
            x_pol[s] = tranx(len, 60 * s)+bx[3];
            y_pol[s] = trany(len, 60 * s)+by[5];
        }
 
  str = str + poly("yellow");
 
str=str+"</svg>";
 
 
$("#memo").html(str);
 
} 
 
function tranx(le1,th1){
 
x1 = le1*Math.cos(th1 * Math.PI / 180);
return x1;   
}
 
function trany(le1,th1){
 
    y1 =  le1*Math.sin(th1 * Math.PI / 180);
 
 return y1;   
} 
 
function poly(col){
 
var str,data;
var s;
data="";
for(s=1;s<number_pol;s++){
data=data+x_pol[s]+","+y_pol[s]+",";
}
s=number_pol;
data=data+x_pol[s]+","+y_pol[s];
 
str="<polygon fill="+chop(col)+" points="+chop(data)+"/>";
 
return str; 
}
 
function chop(str){
 
var strx;
 
strx="\""+str+"\"";
 
return strx;
 
}