i888; - 経済統計練習帳

var point=new Array();
 
function myFunction() {
 
 
 urlx="https://opendata.resas-portal.go.jp/api/v1/population/future/cities?year=2040&prefCode=1";
 
 var he = {
    'X-API-KEY': 'QTPchshTtS5JGmrEw0ELladqSbGwnKxh5KVqmZvU'
  };       
 
 
   var op = {
   'headers' : he
 };     
 
 
      str="";
      try {
 
 var res = UrlFetchApp.fetch(urlx,op);
        str=res.getContentText();
 
    } catch (e) { Logger.log("Fail");}
 
  Logger.log(str);
 
 
  p1=str.indexOf("[");
  p2=str.indexOf("]",p1);
 
  str=str.substring(p1+1,p2);
 
  de="},";
 
  for(s=1;s<100;s++){
  str=str.replace(de,"△");
}
 
  var x=str.split("△");
 
  sx=0;
  for(s=0;s<x.length;s++){
 sx=sx+1;
}
 
number=sx;  
  for(s=0;s<number+1;s++){
  point[s]=new Array();
  }
  point[0][0]="a";
  point[0][1]="b";
  for(s=1;s<number+1;s++){
    p1=x[s-1].indexOf("cityName");
    p1=x[s-1].indexOf(":",p1);
     p2=x[s-1].indexOf(",",p1);
   p3=x[s-1].indexOf("value",p2);
    p3=x[s-1].indexOf(":",p3);
    p4=x[s-1].length;
  point[s][0]=x[s-1].substring(p1+1,p2);
  point[s][1]=x[s-1].substring(p3+1,p4);;
  } 
 
 
    var id="120mNyNCmDiPObyJ_QebmqDiOM_oEqlefTiObwudpIbw"; 
 ex = SpreadsheetApp.openById(id);
 var sheet = ex.getSheetByName("data"); 
 
 sheet.getRange(1,1,number+1,2).setValues(point);  
 
 
}