kinnyuX - 経済統計練習帳

var sol_ols=new Array();
var x_ols = new Array();
var y_ols = new Array();
var number_ols,datanumber_ols;
 
var number;
 
var loandi=new Array();
var topix=new Array();
var irl=new Array();
var irloan=new Array();
var topix=new Array();
var fxyen=new Array();
var fxn=new Array();
var fxr=new Array();
 
var c=new Array();
var cn=new Array();
var ih=new Array();
var ihn=new Array();
 
var g=new Array();
var cg=new Array();
var ig=new Array();
var ign=new Array();
var cgn=new Array();
var iig=new Array();
var iign=new Array();
var gn=new Array();
 
var inv=new Array();
var invn=new Array();
var iips=new Array();
 
 
var pc=new Array();
var pih=new Array();
var pinv=new Array();
var pcg=new Array();
var pig=new Array();
var psnaiv=new Array();
 
 
 
var ex=new Array();
var exn=new Array();
var imoiln=new Array();
var imxon=new Array();
var imn=new Array();
var im=new Array();
var  bpnexi=new Array();
var bpntr=new Array();
 
var gdp=new Array();
var  gdpn=new Array();
var gdpnadj=new Array();
 var fd=new Array();
var  fdn=new Array();
var nindtax=new Array();
 var ddf=new Array();
var  ddfn=new Array();
var gdpq=new Array();
 var gdpqnonhp=new Array();
var  gap=new Array();
var hygdpq=new Array();
 
 
 
 
var id; 
var ex1;
 
function data_k(){
 
var sheet = ex1.getSheetByName("k");
 
var v=sheet.getRange(1, 1,67,4).getValues();
 
 for(s=1;s<number+1;s++){ 
 pc[s]=v[s][0]; 
 pih[s]=v[s][1];  
 pinv[s]=v[s][2];  
 psnaiv[s]=v[s][3]; 
 pcg[s]=v[s][4];  
 pig[s]=v[s][5];  
 
 }
 
 
 
 
}
 
function data_l(){
 
var sheet = ex1.getSheetByName("l");
 
var v=sheet.getRange(1, 1,67,4).getValues();
 
 
 
 for(s=1;s<number+1;s++){ 
 gdp[s]=v[s][0]; 
 gdpn[s]=v[s][1];  
gdpnadj[s]=v[s][2]; 
 nindtax[s]=v[s][3];
 fd[s]=v[s][4];
 fdn[s]=v[s][5];  
 ddf[s]=v[s][6];
 ddfn[s]=v[s][7];
 gdpq[s]=v[s][8];  
 gdpqnonhp[s]=v[s][9];
 gap[s]=v[s][10];
 hygdpq[s]=v[s][11];  
 }
 
 
 
 
}
 
 
 
function data_f(){
 
var sheet = ex1.getSheetByName("f");
 
var v=sheet.getRange(1, 1,67,9).getValues();
 
 for(s=1;s<number+1;s++){ 
 inv[s]=v[s][0]; 
 invn[s]=v[s][1];  
 iips[s]=v[s][2];   
 }
 
 
 
 
}
 
 
 
function data_i(){
 
var sheet = ex1.getSheetByName("l");
 
var v=sheet.getRange(1, 1,67,4).getValues();
 
 for(s=1;s<number+1;s++){ 
 c[s]=v[s][0]; 
 cn[s]=v[s][1];  
 ih[s]=v[s][2];  
 ihn[s]=v[s][3];
 }
 
 
 
 
}
 
function data_e(){
 
var sheet = ex1.getSheetByName("l");
 
var v=sheet.getRange(1, 1,67,9).getValues();
 
 for(s=1;s<number+1;s++){ 
 ex[s]=v[s][0]; 
 exn[s]=v[s][1]; 
 imoiln[s]=v[s][2];
 imxon[s]=v[s][3];
 imn[s]=v[s][4];
   im[s]=v[s][5];
 bpnexi[s]=v[s][6];
 bpntr[s]=v[s][7];
 }
 
 
 
 
}
 
 
 
function data_c(){
 
var sheet = ex1.getSheetByName("c");
 
var v=sheet.getRange(1, 1,67,8).getValues();
 
 for(s=1;s<number+1;s++){ 
 g[s]=v[s][0]; 
 cg[s]=v[s][1];  
 ig[s]=v[s][2];  
 iig[s]=v[s][3]; 
 cgn[s]=v[s][4];  
 ign[s]=v[s][5];  
 iign[s]=v[s][6]; 
 gn[s]=v[s][7]; 
 }
 
 
 
 
}
 
 
function data_b(){
 
var sheet = ex1.getSheetByName("b");
 
var v=sheet.getRange(1, 1,67,7).getValues();
 
 for(s=1;s<number+1;s++){
 
 irl[s]=v[s][0]; 
 irloan[s]=v[s][1];  
 loandi[s]=v[s][2]; 
 topix[s]=v[s][3];
 fxyen[s]=v[s][4];
 fxn[s]=v[s][5];
 fxr[s]=v[s][6];
   }
 
 
}
 
function myFunction() {
 
 
  id="1PL9vcWZgA8b7LAjMV5j0FeHRCJF-xW1eFrvI2Fgi9E4";
  ex1 = SpreadsheetApp.openById(id);
 
  number=66;
 
 data_b();
 
 data_c();
 
 data_e();
 
 data_f(); 
 
 data_k(); 
 
 data_i();
 
  data_l();
 
  ex_b2();
 
  ex_b3();
 
 
 
}
 
function ex_b2(){
 
number_ols=2;
 datanumber_ols=number;
  for(s=1;s<datanumber_ols+1;s++){
  x_ols[s]=new Array();
  }
 
 
  for(s=1;s<datanumber_ols+1;s++){
  x_ols[s][1]=irl[s];
  x_ols[s][2]=loandi[s];
  y_ols[s]=irloan[s];
  }
 
 
  ols();
 
  Logger.log(sol_ols[1]);
  Logger.log(sol_ols[2]);
 
 
}
 
 
function ex_b3(){
 
number_ols=3;
 datanumber_ols=number;
  for(s=1;s<datanumber_ols+1;s++){
  x_ols[s]=new Array();
  }
 
 
  for(s=1;s<datanumber_ols+1;s++){
  x_ols[s][1]=1;
  x_ols[s][2]=loandi[1];
  z=Math.log(topix[2])-Math.log(topix[1]); 
  if(s>1)z=Math.log(topix[s])-Math.log(topix[s]);  
  x_ols[s][3]=z;
  if(s>1)x_ols[s][2]=loandi[s-1];
   y_ols[s]=loandi[s];
  }
 
 
  ols();
 
  Logger.log(sol_ols[1]);
  Logger.log(sol_ols[2]);
  Logger.log(sol_ols[3]);
 
 
}
 
 
function ols(){
 
var a_ols=new Array();
var b_ols=new Array();
 
for(s=1;s<number_ols+1;s++){
a_ols[s]=new Array();
}
 
 
for(s=1;s<number_ols+1;s++){    
y1 = 0;
for (sx = 1; sx <datanumber_ols;sx++ ){
y1=y1+x_ols[sx][s]*y_ols[sx];    
}
b_ols[s]=y1;
}
 
 
 
for(s1=1;s1<number_ols+1;s1++){    
for(s2=1;s2<number_ols+1;s2++){ 
y1 = 0;
for (sx = 1; sx <datanumber_ols;sx++ ){
y1=y1+x_ols[sx][s1]*x_ols[sx][s2];    
}
a_ols[s1][s2]=y1;
}} 
 
 
for(s=1;s<number_ols+1;s++){
for(sx=1;sx<number_ols+1;sx++){
z=a_ols[sx][s]/a_ols[s][s];
if(s==sx)z=0;
for(tx=1;tx<number_ols+1;tx++){
a_ols[sx][tx]=a_ols[sx][tx]-z*a_ols[s][tx];
}
b_ols[sx]=b_ols[sx]-z*b_ols[s];
}
}
 
 
for(s=1;s<number_ols+1;s++){
sol_ols[s]=b_ols[s]/a_ols[s][s];
}
 
 
 
}