●PSHメモ帳でGoogleChartsのグラフが自由に使える
◎GoogleがChrome等で利用のHTMLグラフ表示用に公開しているGoogleChartsサイトです。綺麗で沢山のグラフの種類があります。このサイトに掲載の約８割のグラフを、PSHメモ帳で操作することでパソコンを快適利用します。今回は、GoogleChartsで、どんなことが出来るかの紹介として「おもしろグラフ」「本格的グラフ」の事例を記載します。
＜戻る 進む＞
●開始画面の表示
◎PSHメモ帳[wPshMemo201.bat]をダブルクリック[WC]し次項で作成の[wPshgraf101.txt]を表示ください。
[File表示]ドラッグ＆ドロップ or [TopPage]に登録し[WC]
★注: この記事を最初に閲覧される方は その２[2.7][2.8] その３[3.1]で「PSHメモ帳」と追加ファイルを作成する必要がありますのでご参照ください。
●TXTファイルの組込み
◎コピペListから次のTXTファイルを作成ください。
[コピペList3.3.1] -> [wPshGraf101.txt]
[コピペList3.3.2] -> [grfData.txt]
◎今回ファイルが多くなり、また今までのTXTファイルの整理から[wGuiPsh2]フォルダ内に、[grf]と[dat]のフォルダを作成し次のようにTXTファイルを移行ください。
[wGuiPsh2] フォルダ
＋[grf] wPshGraf101.txt grfData.txt
(次回予定 wPshGraf201.txt wPshGraf301.txt )
＋[dat] wndPshTxt201.txt wndPshTxtShort201.txt
wPshKeisan101.txt wPshKeyAuto101.txt
＋wPshMemo201.bat
＋wndPshPrg201.ps1
＋wndPshPrg201_add.ps1
＋wndPshPrg201_usr.ps1
[TopPage] の設定は以下となります。
&FSet& grf\wPshGraf101.txt ##★[WC]PSHグラフ表示１(おもしろ＋実用編)
&FSet& grf\wPshGraf201.txt ##★[WC]PSHグラフ表示２(折れ線/曲線/散布/面/階段..）
&FSet& grf\wPshGraf301.txt ##★[WC]PSHグラフ表示３(縦棒/横棒/複合/円/他）
●グラフ表示の原理
◎PSHメモ帳は、各種グラフ設定の $zType $zOption $zData を基本設定とし、オプションとして、$zColum $zAddProg $zAddBody を設定した後、ssGraf 関数を起動することで、HTMLファイル[gChart01.html]をDsktop上に作成します。そのファイルを起動することでGoogleChartsのグラフ表示する方法を取っています。
(1)$zType: グラフの種類
(2)$zOption: グラフ描画の各種パラメータ
(3)$zDataには２種類のグラフデータ設定モードがあります。
$zData="[ 配列 ]" モードで配列を[ ] で括ります。
$zData="プログラム" モードでグラフ設定データをプログラムで指定します。
(4)$zColum $zAddProg $zAddBody は次項のグラフ[11][12]を参照とします。
$zColumはグラフ[12]でタイマイベント設定、$zAddProg $zAddBody はグラフ[11]で釦配置及び関数設定に使用しています。
またhtmlファイルの生成例としてグラフ[11]を使って説明します。
[&&& $zType="Gauge";##★[WC]]行をダブルクリックすると下図のhtmlファイルが生成されます。PSH処理により[$zType][$zOption][$zData]などを必要な個所に組込む(オレンジ文字)ことでhtmlファイルを生成しています。
<html><head><script type="text/javascript" src="https://www.gstatic.com/charts/loader.js"></script>
<script type="text/javascript"> google.charts.load("current", {packages:["Gauge"]});
google.charts.setOnLoadCallback(drawChart); var chart; var options; var data;
function drawChart(){ chart = new google.visualization.Gauge(document.getElementById("chart_values"));
options={ width:680, height:340,min:0, max:280, yellowFrom:200, yellowTo:250, redFrom:250, redTo:280, minorTicks:5,}; data =new google.visualization.DataTable(); data.addColumn('number', 'Engine'); data.addColumn('number', 'Torpedo');
data.addRows(2); data.setCell(0, 0, 120); data.setCell(0, 1, 80);
; ;chart.draw(data, options); };
function changeSpeed(dd){ data.setValue(0,0,data.getValue(0,0) + dd*25);
data.setValue(0,1,data.getValue(0,1) +dd*20); chart.draw(data,options); };
function ssWebView(dd){ switch(dd){
case 11: window.open( 'https://www.yahoo.co.jp' ); return;
case 12: window.open( 'https://www.msn.com/ja-jp' ); return;
case 13: window.open( 'https://ryupapa008.blogspot.com' ); return;
}; }; ;</script></head><body><div id="chart_values" ></div><input type='button' value='[加速]' onclick='changeSpeed(1)' />
<input type='button' value='[減速]' onclick='changeSpeed(-1)'/>
<input type='button' value='yahoo' onclick='ssWebView(11)'/>
<input type='button' value='MSN' onclick='ssWebView(12)'/>
<input type='button' value='GuiPshｻｲﾄ' onclick='ssWebView(13)'/>
</body></html>
●[11]Ｇメータグラフ（「加速/減速]などの釦を付ける
このグラフは、$zType="Gauge"を設定し、$zOptionにグラフ寸法やＧメータパラメータを設定し、$zData="プログラム" モードで設定します。
また、$zAddProgに釦関数、$zAddBodyに釦配置の設定例です。($zColum="” )
ssGraf $zType $zOption $zData "" $zAddProg $zAddBody;
次の行を[WC]すると下図が表示されます。図に[加速][減速][yahoo][MSN][GuiPshｻｲﾄ] の釦を配置しています。各釦を押下するとその機能が動きます。なお、他のグラフに釦配置する場合もこの方法で利用可能です。
&&& $zType="Gauge"; ##★[WC]
[HTML]
[----]
●[12]散布グラフ(★が動く、すごいな
このグラフは、次の行を[WC]すると下図が表示され、円内の★が動き回ります。
&&& $zType="ScatterChart"; ##★[WC]
$zTypeは上記設定で、$zOptionにグラフの各種パラメータを設定し、$zData="プログラム" モードで設定します。$zColumに★動作用のタイマイベントを設定し、次の関数でグラフ表示する$zColumの利用例です。
[関数] ssGraf $zType $zOption $zData $zColum;
[タイマイベント起動関数]
function randomWalk(){ var x=data.getValue(data.getNumberOfRows()-1, 0);
var y =data.getValue(data.getNumberOfRows()-1, 1);
x +=20*(Math.random()-0.5); y += 20 * (Math.random() - 0.5);
if( x*x + y*y > radius * radius){ x +=Math.random()*((x < 0) ? 5 : -5);
y +=Math.random()*((y < 0) ? 5 : -5); }
data.setValue(data.getNumberOfRows()-1, 0, x);
data.setValue(data.getNumberOfRows()-1, 1, y);
chart.draw(data, options);
}
[HTML]
[----]
●[13][19]マップグラフ(世界図/日本図で人口かな
このグラフは、次の行を[WC]すると下図が表示されます。
&&& $zType="GeoChart"; ##★[WC]//全世界
&&& $zType="GeoChart"; ##★[WC]//[030]東アジア
&&& $zcc=" ##★[WC]日本人口図...[19]
$zTypeは上記設定で、$zOptionに各種パラメータを設定し、$zData="[2行xN列]" の配列モードを設定します。
ssGraf $zType $zOption $zData;
[19]日本人口データはWebからマウスコピー&ペーストで取得
●[14]アノテーショングラフ(すごそうでも使い方不明
このグラフは、次の行を[WC]すると下図が表示されます。
&&& $zType="AnnotationChart"; ##★[WC]
$zTypeは上記設定で、$zOptionに各種パラメータを設定し、$zData="[7行xN列]" の配列モードを設定します。
ssGraf $zType $zOption $zData;
[HTML]
[----]
●[15]ローソクグラフ１(基本型はあまり魅力ないが、
このグラフは、次の行を[WC]すると下図が表示されます。
&&& $zType="CandlestickChart"; ##★[WC]
$zTypeは上記設定で、$zOptionに各種パラメータを設定し、$zData="[5行xN列]" の配列モードを設定します。
ssGraf $zType $zOption $zData;
[HTML]
●[16]ローソクグラフ２(Fileからデータ取得しグラフ生成すると結構いける
このグラフは、次の行を[WC]すると下図が表示されます。grfData.txt は、コピペ[List3.2.2]をコピーして作成し動作確認ください。(フォルダ[grf]内に保存)
&&& $zfl="grfdata.txt"; $zcm=(Cat "grf\$zfl").replace(",",""); ##★[WC][16]
また、Fileデータのデータ更新は、下記を[WC]したサイトからマウスコピペ取得し更新します。
!Webデータ箇所; 'https://www.kabudragon.com/s?t=8050&x=0&y=0' ##★[WC]
なお、配列データを$zcc0に設定し、次の行でグラフ表示します。
for(){ $zcc0+=("['$dt0',$dt1,$dt2,$dt3,$dt4],`n"); };
$zData="[ $zcc0 ], true "; ssGraf $zType $zOption $zData;
[HTML]
[----]
●[17]ローソクグラフ３(分析Ma線等を付加したら本格的なグラフになった
このグラフは、次の行を[WC]すると下図が表示されます。grfData.txt は、コピペ[List3.2.2]をコピーして作成し動作確認ください。(上記[16]に同じ)
&&& $zfl="grfdata.txt"; $zcm=(Cat "grf\$zfl").replace(",",""); ##★[WC][17]
このグラフは、$zType="ComboChart" を使用し、$zOptionは左記で使用の各種パラメータを設定します。
なお、配列データを$zcc0に設定し、次の行でグラフ表示します。
for(){ $zcc0+=("['$dt0',$dt1,$dt2,$dt3,$dt4,$dt5,$dt6,$dt7,$dt10],`n"); };
$zData="[ $zcc0 ], true "; ssGraf $zType $zOption $zData;
＜$zOption内の分析Ma等の追加部分＞
; seriesType:'candlesticks', series:{ 0:{targetAxisIndex:1,}, //dt0,dt1,dt2,dt3,dt4
; 1:{type:'line',lineWidth:2,color:'#FF0000' ,targetAxisIndex:1,}, //dt5:Ma5
; 2:{type:'line',lineWidth:2,color:'#0000FF' ,targetAxisIndex:1,}, //dt6:Ma15
; 3:{type:'line',lineWidth:2,color:'#9932CC' ,targetAxisIndex:1,}, //dt7:Ma25
; 4:{type:'bars',lineWidth:3,color:'orange' ,targetAxisIndex:1,}, //dt10:株量
; }
＜追伸＞
データファイルを使わず、マウスコピー後のクリップボードから直接入力する場合、下記行①を②に変更するとグラフ表示できます。
&&& $zfl="grfdata.txt"; $zcm=(Cat "grf\$zfl").replace(",",""); ##★[WC][17]・・・①&&& $zfl="せいこう8050"; $zcm=((Get-ClipBoard).replace(",","")).split("`n"); ##★[WC][17]・・・②●コピペ[List3.3.1] [wPshGraf101.txt] フォルダ[grf]内に保存、
#![Dir管理] @BakColor:#fdf5e6 @FntSize:13 @WndSize:1280,720
##●●googleグラフ１：おもしろグラフと本格的グラフ
## [11]Ｇメータグラフ（「加速/減速]などの釦を付ける
## [12]散布グラフ(★が動く、すごいな
## [13][19]マップグラフ(世界図/日本図で人口かな
## [14]アノテーショングラフ(すごそうでも使い方不明
##
## [15]ローソクグラフ１(基本型はあまり魅力ないが、
## [16]ローソクグラフ２(Fileからデータ取得しグラフ生成すると結構いける
## [17]ローソクグラフ３(分析Ma線等を付加したら本格的なグラフになった
##★[11]Ｇメータグラフ（「加速/減速]など釦を付ける
##
&&& $zType="Gauge"; ##★[WC]
; $zOption="{ width:680, height:340,
; min:0, max:280, yellowFrom:200, yellowTo:250, redFrom:250, redTo:280, minorTicks:5,
; }";
; $zData="data.addColumn('number', 'Engine'); data.addColumn('number', 'Torpedo');
; data.addRows(2); data.setCell(0, 0, 120); data.setCell(0, 1, 80);
; ";
; $zAddProg="
; function changeSpeed(dd){ data.setValue(0,0,data.getValue(0,0) + dd*25);
; data.setValue(0,1,data.getValue(0,1) +dd*20); chart.draw(data,options); };
; function ssWebView(dd){
; switch(dd){
; case 11: window.open( 'https://www.yahoo.co.jp' ); return;
; case 12: window.open( 'https://www.msn.com/ja-jp' ); return;
; case 13: window.open( 'https://ryupapa008.blogspot.com' ); return;
; };
; };
; ";
; $zAddBody="<input type='button' value='[加速]' onclick='changeSpeed(1)' />
; <input type='button' value='[減速]' onclick='changeSpeed(-1)'/>
; <input type='button' value='yahoo' onclick='ssWebView(11)'/>
; <input type='button' value='MSN' onclick='ssWebView(12)'/>
; <input type='button' value='GuiPshｻｲﾄ' onclick='ssWebView(13)'/>
; ";
; ssGraf $zType $zOption $zData "" $zAddProg $zAddBody;
##★[12]散布グラフ(★が動く、すごいな
##
&&& $zType="ScatterChart"; ##★[WC]
; $zOption="{ title: '[リングと星のお遊び]', titleTextStyle:{color:'blue', fontSize:22},
; width: 500, height: 500, backgroundColor:'#f1f8e9', chartArea:{left:100, top:100, right:100, bottom:100},
; colors:['#087037'], pointShape:'star', pointSize:18, animation:{ duration:200, easing:'inAndOut'},
; legend:'none',
; }";
; $zColum="google.visualization.events.addOneTimeListener(chart, 'ready', randomWalk);
; google.visualization.events.addListener(chart, 'animationfinish', randomWalk);
; ";
; $zData="
; data.addColumn('number'); data.addColumn('number'); var radius=100;
; for(var i=0; i<6.28; i +=0.1){ data.addRow([radius *Math.cos(i), radius *Math.sin(i)]); }
; data.addRow([0,0]);
; function randomWalk(){
; var x =data.getValue(data.getNumberOfRows()-1, 0); var y =data.getValue(data.getNumberOfRows()-1, 1);
; x +=20*(Math.random()-0.5); y += 20 * (Math.random() - 0.5);
; if( x*x + y*y > radius * radius) { x += Math.random() * ((x < 0) ? 5 : -5); y += Math.random() * ((y < 0) ? 5 : -5); }
; data.setValue(data.getNumberOfRows()-1, 0, x);
; data.setValue(data.getNumberOfRows()-1, 1, y);
; chart.draw(data, options);
; }
; "; ssGraf $zType $zOption $zData $zColum;
##★[13]マップグラフ(世界図で人口かな
!googleマップオプション; https://developers.google.com/chart/interactive/docs/gallery/geochart?hl=ja#full ##★[WC]
##
&&& $zType="GeoChart"; ##★[WC]//全世界
; $zOption="{ title:'世界地図での動向', titleTextStyle:{color:'blue', fontSize:22},
; width:600, height:400, fontSize:16, backgroundColor:'#4040FF',
; }";
; $zData="[ ['国名', 'XXX数'],
; ['Germany',200], ['United States',300], ['Brazil',400], ['Canada',500], ['France',400], ['RU',600], ['JP',300],
; ]"; ssGraf $zType $zOption $zData;
##★[13]マップグラフ(region指定
&&& $zType="GeoChart"; ##★[WC]//[030]東アジア
; $zOption="{ title:'東アジアでの動向', titleTextStyle:{color:'blue', fontSize:22},
; width:600, height:400, fontSize:16, backgroundColor:'#4040FF',region:'030',
; }";
; $zData="[ ['国名', 'XXX数'],
; ['CN',150], ['HK',100], ['JP',100], ['KP',20], ['KR',60], ['MN',80], ['MO',50], ['TW',80],
; ]"; ssGraf $zType $zOption $zData;
##★[19]マップグラフ(日本:region指定:JP,県 ★追加
##★[14]アノテーショングラフ(すごそうでも使い方不明
##
&&& $zType="AnnotationChart"; ##★[WC]
; $zOption="{ displayAnnotations: true, titleTextStyle:{color:'blue', fontSize:22},
; width:900, height:600, fontSize:16,
; }";
; $zData ="[
; ['Date', 'Kepler-22b mission', 'Kepler title', 'Kepler text', 'Gliese 163 mission', 'Gliese title', 'Gliese text' ],
; [ new Date(2314, 2, 15), 12400, undefined, undefined, 10645, undefined, undefined],
; [ new Date(2314, 2, 16), 24045, 'Lalibertines', 'First encounter', 12374, undefined, undefined],
; [ new Date(2314, 2, 17), 35022, 'Lalibertines', 'They are very tall', 15766, 'Gallantors', 'First Encounter'],
; [ new Date(2314, 2, 18), 12284, 'Lalibertines', 'Attack on our crew!', 34334, 'Gallantors', 'Statement of shared principles'],
; [ new Date(2314, 2, 19), 8476, 'Lalibertines', 'Heavy casualties', 66467, 'Gallantors', 'Mysteries revealed'],
; [ new Date(2314, 2, 20), 0, 'Lalibertines', 'All crew lost', 79463, 'Gallantors', 'Omniscience achieved']
; ]"; ssGraf $zType $zOption $zData;
##★[15]ローソクグラフ１(基本型は魅力ないが
##
&&& $zType="CandlestickChart"; ##★[WC]
; $zOption="{title:'ローソクXXXX', titleTextStyle:{fontSize:22, color:'black'},
; width:600, height:300, fontSize:16, chartArea:{left:20, top:30, right:70, bottom:40}, legend:'none',
; series:{
; 0:{targetAxisIndex: 1,},
; }
; }";
; $zData="[
; ['2/3', 20,28,38,45], ['2/4', 31,38,55,66], ['2/5', 50,55,77,80], ['2/6', 77,70,66,50], ['2/8', 68,66,22,15],
; ['2/11',20,28,38,45], ['2/12',31,38,55,66], ['2/13',50,55,77,80], ['2/14',77,77,66,50], ['2/15',68,66,22,15],
; ['2/18',20,28,38,45], ['2/19',31,38,55,66], ['2/20',50,55,77,80], ['2/21',77,77,66,50], ['2/22',68,66,22,15],
; ], true "; ssGraf $zType $zOption $zData;
##★[16]ローソクグラフ２(Fileからデータ取得しデータ生成すると
!Webデータ箇所; 'https://www.kabudragon.com/s?t=8050&x=0&y=0' ##★[WC][日付]下からマウスでコピペ
##
&&& $zfl="grfdata.txt"; $zcm=(Cat "grf\$zfl").replace(",",""); ##★[WC][16]
; $nn=$zcm.length; $zcc0=""; ##dbc $zcm; ##高値2,終値4,始値1,安値3
; for( $ii=$nn-1; $ii -ge 0; $ii--){ $cc=$zcm[$ii]; if($cc.startsWith("20") ){;}else{ continue; }; $ccm=$cc.split("`t");
; $dt0=$ccm[0].replace("2024/",""); $dt1=$ccm[2]; $jj++; $dt2=$ccm[4]; $dt3=$ccm[1]; $dt4=$ccm[3];
; $zcc0+=("['$dt0',$dt1,$dt2,$dt3,$dt4],`n");
; }; ##dbc $zcc0;
; ##★
; $zType="CandlestickChart";
; $zOption="{title:' $zfl チャート', titleTextStyle:{fontSize:20, color:'black'},
; width:1280, height:620, fontSize:12, chartArea:{left:20, top:30, right:70, bottom:40},legend:'none',
; series:{
; 0:{targetAxisIndex:1,},
; }
; }";
; $zData="[ $zcc0 ], true "; ssGraf $zType $zOption $zData;
##★[17]ローソクグラフ３(更に分析Ma線を付加したら本格的に
##
&&& $zfl="grfdata.txt"; $zcm=(Cat "grf\$zfl").replace(",",""); ##★[WC][17]
; $zYmin=3000; $zKabDvd=1;
; $nn0=$zcm.length; $kcm=New-Object String[](500); $zcc0=""; $jj=-1; ##dbc $zcm; ##高値2,終値4,始値1,安値3
; $zMa1=5; $zMa2=15; $zMa3=25; $zSMa1=$zSMa2=$zSMa3=0;
; for( $ii=$nn0-1; $ii -ge 0; $ii--){ $cc=$zcm[$ii]; if($cc.startsWith("20") ){;}else{ continue; }; $ccm=$cc.split("`t");
; $dt0=$ccm[0].replace("2024/",""); $dt1=$ccm[2]; $jj++; $kcm[$jj]=$dt2=$ccm[4]; $dt3=$ccm[1]; $dt4=$ccm[3];
; $dt10=[int]($ccm[6]*$zKabDvd/1000)+$zYmin;
; ##★Ma演算
; if($jj -lt $zMa1 ){ $zSMa1+=$dt2; $dt5=[int]($zSMa1/($jj+1)) }else{ $zSMa1+=($dt2-$kcm[$jj-$zMa1]); $dt5=[int]($zSMa1/$zMa1); };
; if($jj -lt $zMa2 ){ $zSMa2+=$dt2; $dt6=[int]($zSMa2/($jj+1)) }else{ $zSMa2+=($dt2-$kcm[$jj-$zMa2]); $dt6=[int]($zSMa2/$zMa2); };
; if($jj -lt $zMa3 ){ $zSMa3+=$dt2; $dt7=[int]($zSMa3/($jj+1)) }else{ $zSMa3+=($dt2-$kcm[$jj-$zMa3]); $dt7=[int]($zSMa3/$zMa3); };
; $zcc0+=("['$dt0',$dt1,$dt2,$dt3,$dt4,$dt5,$dt6,$dt7,$dt10],`n");
; }; $dda=$dt2-$kcm[$jj-1]; dbc $zcc0;
; ##★
; $zType="ComboChart";
; $zOption="{title:' $zfl チャート[ $dt0 ] $dt2 ($dda) ', titleTextStyle:{fontSize:20, color:'black'},
; width:1280, height:620, fontSize:12, chartArea:{left:20, top:30, right:70, bottom:40}, legend:'none',crosshair:{trigger:'both',},
; vAxis:{ viewWindow:{ min: $zYmin },},
; seriesType:'candlesticks', series:{ 0:{targetAxisIndex:1,}, //dt0,dt1,dt2,dt3,dt4
; 1:{type:'line',lineWidth:2,color:'#FF0000' ,targetAxisIndex:1,}, //dt5:Ma5
; 2:{type:'line',lineWidth:2,color:'#0000FF' ,targetAxisIndex:1,}, //dt6:Ma15
; 3:{type:'line',lineWidth:2,color:'#9932CC' ,targetAxisIndex:1,}, //dt7:Ma25
; 4:{type:'bars',lineWidth:3,color:'orange' ,targetAxisIndex:1,}, //dt10:株量
; }
; }";
; $zData="[ $zcc0 ], true "; ssGraf $zType $zOption $zData;
##★[19]マップグラフ（日本の人口図：ネットGet
##
##次のサイトから、コピペでＧｅｔし下記へ張付けて[;]を付加し
##
##
!総人口ランキング; https://seijiyama.jp/lgov/lgov-ranking/r02/
&&& $zcc=" ##★[WC]日本人口図
;順位 都道府県 総人口 平均年齢 人口増減率
;1 東京都 14047594 45.25 3.93867
;2 神奈川県 9237337 46.48 1.21764
;3 大阪府 8837685 47.1 -0.02018
;4 愛知県 7542415 45.65 0.79228
;5 埼玉県 7344765 46.84 1.07659
;6 千葉県 6284480 47.14 0.99337
;7 兵庫県 5465002 47.95 -1.26108
;8 北海道 5224614 49.78 -2.91949
;9 福岡県 5135214 46.69 0.65976
;10 静岡県 3633202 48.41 -1.81345
;11 茨城県 2867009 48.15 -1.71297
;12 広島県 2799702 47.66 -1.55725
;13 京都府 2578087 47.74 -1.23608
;14 宮城県 2301996 47.43 -1.36694
;15 新潟県 2201272 49.92 -4.46963
;16 長野県 2048011 49.45 -2.42009
;17 岐阜県 1978742 48.35 -2.61632
;18 群馬県 1939110 48.39 -1.72342
;19 栃木県 1933146 47.95 -2.08225
;20 岡山県 1888432 48.01 -1.72223
;21 福島県 1833152 49.52 -4.22598
;22 三重県 1770254 48.29 -2.51181
;23 熊本県 1738301 48.59 -2.67998
;24 鹿児島県 1588256 49.33 -3.63559
;25 沖縄県 1467480 43.46 2.36571
;26 滋賀県 1413610 45.9 0.04912
;27 山口県 1342059 50.4 -4.46136
;28 愛媛県 1334841 49.99 -3.63982
;29 奈良県 1324473 49.05 -2.92036
;30 長崎県 1312317 49.65 -4.71033
;31 青森県 1237984 50.83 -5.37208
;32 岩手県 1210534 50.59 -5.39702
;33 石川県 1132526 47.91 -1.86151
;34 大分県 1123852 49.67 -3.64268
;35 宮崎県 1069576 49.23 -3.12417
;36 山形県 1068027 50.48 -4.97059
;37 富山県 1034814 49.66 -2.95538
;38 秋田県 959502 52.9 -6.21795
;39 香川県 950244 49.04 -2.66516
;40 和歌山県 922584 50.22 -4.25445
;41 佐賀県 811442 48.05 -2.56835
;42 山梨県 809974 49 -2.98899
;43 福井県 766863 48.49 -2.5265
;44 徳島県 719559 50.54 -4.78661
;45 高知県 691527 51.25 -5.04603
;46 島根県 671126 50.13 -3.34499
;47 鳥取県 553407 49.25 -3.49365
; ";
; ##★下記データ整列
; $zcc=$zcc.replace("県","").replace("府","").replace("都",""); $zdat="";
; foreach( $cc in $zcc.split("`n") ){ if( $cc.startsWith("順位") -or ($cc.length -le 10 )){ continue;};
; $zcm=$cc.split("`t"); $zdat+=( "[`'" +$zcm[1] +"`'," +$zcm[2] +"],`n" );
; }; ##dbc $zdat
;
; ##★グラフ表示
; $zType="GeoChart";
; $zOption="{ title:'[19]日本地図', titleTextStyle:{color:'blue', fontSize:22},
; width:800, height:600, fontSize:16, backgroundColor: '#ebf7fe', region:'JP', resolution:'provinces'
; }";
; $zData="[ ['都道府県', '人口'], $zdat ]"; dbc $zData
; ssGraf $zType $zOption $zData;
[wPshGraf101.txt]
●コピペ[List3.3.2] [grfdata.txt] グラフデータ
https://www.kabudragon.com/s?t=8050&x=0&y=0
2024/9/17 3,720 3,755 3,630 3,715 +0.81% 80,700
2024/9/13 3,655 3,710 3,650 3,685 +0.41% 85,000
2024/9/12 3,700 3,740 3,650 3,670 +0.69% 86,900
2024/9/11 3,680 3,725 3,610 3,645 -2.15% 77,800
2024/9/10 3,750 3,780 3,715 3,725 -0.13% 76,100
2024/9/9 3,640 3,735 3,605 3,730 -1.45% 150,800
2024/9/6 3,940 3,940 3,765 3,785 -2.95% 144,600
2024/9/5 3,870 3,960 3,870 3,900 +0.26% 114,500
2024/9/4 3,875 3,955 3,860 3,890 -2.14% 87,900
2024/9/3 4,030 4,075 3,965 3,975 -1.36% 85,700
2024/9/2 4,050 4,090 4,010 4,030 +1.13% 100,400
2024/8/30 3,955 4,015 3,945 3,985 +0.89% 94,900
2024/8/29 3,930 3,950 3,875 3,950 -0.38% 93,400
2024/8/28 3,890 3,980 3,860 3,965 +1.93% 154,900
2024/8/27 3,885 3,935 3,870 3,890 -1.02% 163,000
2024/8/26 4,100 4,150 3,930 3,930 -4.84% 151,700
2024/8/23 4,170 4,170 4,110 4,130 -1.31% 101,900
2024/8/22 4,200 4,215 4,100 4,185 -0.12% 98,000
2024/8/21 4,290 4,340 4,165 4,190 -2.33% 120,600
2024/8/20 4,400 4,465 4,275 4,290 -1.72% 148,500
2024/8/19 4,225 4,400 4,205 4,365 +2.95% 167,700
2024/8/16 4,365 4,410 4,240 4,240 -0.35% 158,000
2024/8/15 4,300 4,355 4,230 4,255 -1.28% 258,800
2024/8/14 4,080 4,350 4,020 4,310 +7.62% 447,600
2024/8/13 3,750 4,025 3,750 4,005 +8.83% 329,100
2024/8/9 3,730 3,765 3,640 3,680 +0.27% 129,400
2024/8/8 3,510 3,725 3,500 3,670 +0.55% 153,000
2024/8/7 3,670 3,760 3,610 3,650 -2.41% 378,500
2024/8/6 3,640 3,795 3,630 3,740 +16.15% 295,200
2024/8/5 3,645 3,690 3,200 3,220 -16.47% 404,200
2024/8/2 3,980 4,030 3,855 3,855 -9.40% 311,100
2024/8/1 4,445 4,460 4,220 4,255 -5.76% 157,500
2024/7/31 4,415 4,540 4,380 4,515 +0.67% 93,000
2024/7/30 4,420 4,490 4,380 4,485 +0.00% 76,000
2024/7/29 4,420 4,545 4,395 4,485 +3.58% 96,900
2024/7/26 4,400 4,405 4,320 4,330 -1.93% 167,100
2024/7/25 4,500 4,545 4,400 4,415 -4.13% 150,500
2024/7/24 4,720 4,750 4,595 4,605 -3.76% 94,500
2024/7/23 4,780 4,825 4,735 4,785 +1.38% 46,300
2024/7/22 4,800 4,820 4,720 4,720 -1.67% 66,700
2024/7/19 4,675 4,800 4,640 4,800 +2.56% 85,000
2024/7/18 4,785 4,795 4,680 4,680 -3.60% 118,000
2024/7/17 4,870 4,940 4,835 4,855 -0.31% 86,700
2024/7/16 4,925 4,955 4,845 4,870 -1.02% 103,500
2024/7/12 4,880 4,930 4,865 4,920 +0.31% 72,500
2024/7/11 4,985 4,990 4,885 4,905 -0.51% 82,200
2024/7/10 4,920 4,930 4,860 4,930 -0.10% 88,500
2024/7/9 4,860 4,960 4,825 4,935 +2.71% 93,900
2024/7/8 4,925 4,925 4,800 4,805 -2.44% 146,700
2024/7/5 5,020 5,030 4,915 4,925 -2.09% 88,600
2024/7/4 5,020 5,050 4,980 5,030 +0.40% 115,700
2024/7/3 4,865 5,010 4,865 5,010 +2.98% 176,700
2024/7/2 4,875 4,925 4,850 4,865 +0.31% 112,600
2024/7/1 4,930 4,950 4,840 4,850 -1.32% 91,600
2024/6/28 4,930 4,975 4,875 4,915 -0.30% 96,600
2024/6/27 4,895 5,010 4,895 4,930 +1.23% 115,000
2024/6/26 4,835 4,905 4,780 4,870 +1.04% 119,700
2024/6/25 4,750 4,845 4,715 4,820 +1.47% 122,200
2024/6/24 4,940 4,950 4,695 4,750 -3.26% 219,500
2024/6/21 4,980 5,020 4,905 4,910 -2.19% 311,400
2024/6/20 5,120 5,120 4,920 5,020 -0.99% 185,000
2024/6/19 4,880 5,070 4,880 5,070 +3.89% 131,500
2024/6/18 4,920 4,945 4,850 4,880 +0.51% 69,200
2024/6/17 4,920 4,960 4,835 4,855 -1.22% 174,200
2024/6/14 4,690 4,920 4,660 4,915 +4.69% 211,000
2024/6/13 4,840 4,865 4,680 4,695 -1.16% 136,900
2024/6/12 4,665 4,770 4,640 4,750 +2.37% 133,000
2024/6/11 4,705 4,725 4,630 4,640 -1.80% 114,200
2024/6/10 4,695 4,765 4,670 4,725 +2.05% 105,000
2024/6/7 4,615 4,730 4,605 4,630 +0.98% 140,800
2024/6/6 4,485 4,595 4,475 4,585 +3.03% 87,400
2024/6/5 4,550 4,575 4,415 4,450 -2.94% 111,000
2024/6/4 4,625 4,650 4,540 4,585 +0.11% 99,100
2024/6/3 4,590 4,620 4,550 4,580 +0.22% 93,800
2024/5/31 4,580 4,600 4,505 4,570 +0.77% 120,600
2024/5/30 4,395 4,540 4,340 4,535 +2.02% 122,600
2024/5/29 4,530 4,610 4,430 4,445 -2.09% 136,200
2024/5/28 4,430 4,550 4,430 4,540 +1.79% 200,700
2024/5/27 4,415 4,495 4,345 4,460 +1.48% 130,200
2024/5/24 4,210 4,505 4,165 4,395 +3.53% 253,000
2024/5/23 4,250 4,285 4,205 4,245 -0.47% 115,300
2024/5/22 4,280 4,280 4,150 4,265 -1.27% 116,900
2024/5/21 4,415 4,435 4,320 4,320 -1.37% 96,700
2024/5/20 4,320 4,465 4,300 4,380 +2.10% 180,200
2024/5/17 4,245 4,340 4,245 4,290 +0.35% 159,100
2024/5/16 4,235 4,300 4,150 4,275 +4.40% 189,800
2024/5/15 4,240 4,285 3,860 4,095 -3.19% 332,200
2024/5/14 4,110 4,270 4,070 4,230 +2.05% 194,500
2024/5/13 4,135 4,160 4,075 4,145 -0.36% 110,100
2024/5/10 4,170 4,200 4,130 4,160 +0.60% 91,900
2024/5/9 4,155 4,215 4,135 4,135 -0.48% 51,500
2024/5/8 4,180 4,185 4,090 4,155 -0.60% 80,900
2024/5/7 4,230 4,275 4,170 4,180 -0.95% 63,000
2024/5/2 4,200 4,225 4,155 4,220 +0.72% 67,100
2024/5/1 4,170 4,230 4,145 4,190 +0.36% 127,100
[grfdata.txt]