bunnn - 経済統計練習帳

var bus=new Array();
var credit=new Array();
var v=new Array();
var io=new Array();
var rev=new Array();
 
function sample() {
 
 
 var id="1hc0exOsqn7Ti9483O2F-Az1lwP4SEZyalbvUpIQZM3I"; 
 ex1 = SpreadsheetApp.openById(id);
 var sheet = ex1.getSheetByName("data"); 
 
 
var shx = ex1.getSheetByName("rev");
 
number=22;
 
for(s=1;s<number+1;s++){ 
bus[s]=sheet.getRange(s+3, 2).getValue();  
}
 
creditnumber=31;
 
for(s=1;s<creditnumber+1;s++){ 
credit[s]=sheet.getRange(3, s+2).getValue();  
}
 
 
for(s=1;s<number+1;s++){ 
shx.getRange(s+1, 1).setValue(bus[s]);  
}  
 
  for(s=1;s<number+1;s++){
  v[s]=new Array();
  io[s]=new Array();
  }
 
 
  for(s=1;s<number+1;s++){
  for(sx=1;sx<creditnumber+1;sx++){ 
v[s][sx]=sheet.getRange(3+s, sx+2).getValue();  
  }}
 
 
 
 
for(s=1;s<creditnumber+1;s++){ 
shx.getRange(1, s+1).setValue(credit[s]);  
}  
 
 
 
for(s=1;s<number+1;s++){
for(sx=1;sx<creditnumber+1;sx++){ 
shx.getRange(s+1, sx+1).setValue(v[s][sx]); 
  }}
 
 
 
 
 
 
 
 
}
 
 
function mat(k){
 
var b=new Array();
var a=new Array();
 
  for(s=1;s<26;s++){
  b[s]=0;  
  }
 
  b[k]=1;
 
  for(s=1;s<26;s++){
  a[s]=new Array();
  }
 
 
 
  for(s=1;s<26;s++){
  for(sx=1;sx<26;sx++){
  a[s][sx]=io[s][sx];    
  }
  }  
 
 
 
   for(s=1;s<26;s++){
   for(s1=1;s1<26;s1++){
   z=a[s1][s]/a[s][s];
   if(s1==s)z=0;   
   for(sx=1;sx<36;sx++){
    a[s1][sx]=a[s1][sx]-z*a[s][sx];   
    }
    b[s1]=b[s1]-z*b[s];
   }
   }
 
 
   for(s=1;s<26;s++){
   rev[s][k]=b[s]/a[s][s];
   }
 
 
 
 
}