==== skyline2-city-east-japan-earthquake-hyogo-kobe-elderly-population2010 ===================== ==== 東日本大震災主要被災市町と兵庫県内市区の２地域の老年人口比の ==== 合成スカイライン図・合成バブル扇形散布図　2010年国勢調査 ========================================================================== $$u // ユーザデータ・セクション -----------------　東日本大震災主要被災市町分 ---------- $c // クロスセクションデータ属性コマンド 0001.00,0043.00,aaa // ケース始点,終点番号 ,★第１系列名　2010年年少人口 ,bbb // 空白で同一ケース範囲,★第２系列名　2010年生産年齢人口 ,ccc // 空白で同一ケース範囲,★第２系列名　2010年老年人口 $d // データ入力指示コマンド ctype // ケース毎に読むタイプ ------- ユーザ自身が文字・数値データを ------- テキストファイルまたはExcelシートからコピー＆ペーストする． ------- ユーザデータの各行の末尾にも「//」を挿入してコメント文を記述できる． ------- ★ユーザ文字・数値データをこの行直後にペーストする ★↓↓★ 31926 149842 55030 6475 26191 8381 3811 15307 5055 1835 9613 3189 7230 33792 18363 4834 23259 12552 5211 21943 9718 2732 12441 8125 4436 21359 13772 1749 8579 4948 2329 10361 5927 1121 5599 4084 455 2087 1301 356 1759 973 526 2713 1393 2292 10154 5467 136832 703379 191722 20214 96297 43747 6437 34476 15493 8746 42004 22600 11147 47815 13945 9453 41769 11531 6691 28729 8723 6181 26751 9932 4654 21776 8078 1691 9729 5284 1510 8920 4654 2880 13132 4400 5483 22934 5526 1057 5616 3362 2158 10031 5238 46776 208667 85510 5187 22832 9577 9649 42196 18809 765 3365 1288 1021 4684 1995 2242 10245 3342 1848 7252 2413 928 4119 1879 2719 12550 5548 1118 4890 2215 5929 28939 12074 8890 43499 16630 ---------------------　兵庫県内市区分 ------------------------ $$u // ユーザデータ・セクション $c // クロスセクションデータ属性コマンド 0001.00,0037.00,AAA // ケース始点,終点番号 ,★第１系列名　2010年年少人口 ,BBB // 空白で同一ケース範囲,★第２系列名　2010年生産年齢人口 ,CCC // 空白で同一ケース範囲,★第２系列名　2010年老年人口 $d // データ入力指示コマンド ctype // ケース毎に読むタイプ ------- ユーザ自身が文字・数値データを ------- テキストファイルまたはExcelシートからコピー＆ペーストする． ------- ユーザデータの各行の末尾にも「//」を挿入してコメント文を記述できる． ------- ★ユーザ文字・数値データをこの行直後にペーストする ★↓↓★ 29617 138228 41526 16396 85667 29860 10535 65135 30002 10839 60393 29901 20147 104546 42060 28711 136506 54608 31772 142101 52492 10829 82184 28696 36117 166199 45073 80093 338884 115703 53922 289125 106070 40266 184936 61866 71847 313110 92399 6109 27608 13484 12635 58820 21570 29644 127087 39275 3617 18337 9149 11893 49523 24144 39271 172184 55078 6970 30603 12888 5977 25061 11734 32168 142599 50453 10197 49512 21262 13450 60280 20059 21727 94176 40398 7638 30893 11125 16051 78588 19286 6162 29457 12364 5398 25493 12346 3316 14419 8759 9427 38768 19512 6387 28791 14616 4320 18524 9948 5377 26020 15062 5726 23842 11369 5805 25515 8861 11253 49966 19223 ====================== $$v // 変量分析セクション $a // 変量記号の割り当て a,aaa // 　東日本大震災主要被災市町の2010年年少人口 b,bbb // 　 生産年齢人口 c,ccc // 　 老年人口 A,AAA // 　兵庫県内市区の2010年年少人口 B,BBB // 　 生産年齢人口 C,CCC // 　 老年人口 ---------------- $d // 表示範囲 all // 全範囲 ---------------- $t // 変数変換 d=(a+b+c) // 東日本大震災主要被災市町の2010年人口（年齢不詳を除く） D=(A+B+C) // 兵庫県内市区の2010年人口（年齢不詳を除く） k=(c/d*100) // 東日本大震災主要被災市町の老年人口比　％ l=(C/D*100) // 兵庫県内市区の老年人口比　％ .................. P=:ci(d) // 東日本大震災主要被災市町の識別文字列P作成 Q=:ci(D) // 兵庫県内市区の識別文字列Q作成 =pr*(a,b,c,d,A,B,C,D,k,l,P,Q) // 数値プリント .................... i=max(d) //　東日本大震災主要被災市町の人口の最大値maxのスカラーi（区切りに利用） i=(i*0.3) //　 ★スカラーi（区切りに利用）は幅が大きくなるので30%に縮小 I=:ci(i)* //　スカラーiに文字 "*" の文字列変量I　作成（スカイライン区切りに利用） ?Y=(d,i,D) //　人口　主要被災市町分a＋スカラーi＋兵庫県内市区分c の連結変量?Y ?K=(k,0,l) //　老年人口比 主要被災市町分k＋数値0＋兵庫県内市区分l の連結変量?K ?P=(P,I,Q) //　文字列変量 主要被災市町分P＋文字列I＋兵庫県内市区分Q の連結変量?P q=cum(?Y) // 分母変量?Yの累和 q<i>=?Y<1>+?Y<2>+...+?Y<i-1>+?Y<i> r=(q-?Y) // 直前までの累和 r<i>=?Y<1>+?Y<2>+...+?Y<i-1> =q<i>-?Y<i> .................... h=(20) // ★ h 老年人口比 20％　　 .=(0,h) // スカイライン図上の老年人口比 20％の横線 y=0*x+h の右辺係数の関数「.」 -=(0,30) // スカイライン図上の老年人口比 30％の横線 y=0*x+30 の右辺係数の関数「-」 +=(h/100,0) // 散布図の老年人口比 h％の斜線 y=(h/100)*x+0 の右辺係数の関数「+」 ............ 最大ケースの変量zを作成 z=csl(d,D) // 変量dと変量Dの統合（dの欠測ケースにはDの数値を採用） z=(0*z) // 最大ケースの変量zの全ケースにゼロの数値（扇形散布図の原点に利用） S=:ci(z) // 最大ケースの変量zの識別文字列S作成 =============== $$g // グラフセクション $d // 表示範囲 all // 全範囲 $g // スケールの目盛り指示コマンド（標準10ポイント） ?K,001 // 変量?Kの目盛りを細かく1ポイントごとに c,001 // 変量c の目盛りを細かく1ポイントごとに C,001 // 変量C の目盛りを細かく1ポイントごとに $z // ゼロ軸表示 ?KcC // 変量?K,c,Cのゼロ軸表示 ---------------------- 老年人口比 ------------ $3 // ３次元図　老年人口比スカイライン図　　　横幅：人口（年齢不詳を除く） ?K,q, ,?P,.,-,* // 縦軸?K,横軸q,奥行軸なし,個体識別?P,関数「.」「-」,合成用保存* ?K,r, ,?P,* // 縦軸?K,横軸r,奥行軸なし,個体識別?P,合成用保存* // 合成 老年人口比スカイライン図（リンク面描画，３次元図圧縮） ........ $3 // ３次元図　扇形散布図 縦軸：老年人口 横軸：人口（年齢不詳を除く） c,d, ,P=c,+,* // 縦軸c,横軸d,奥行軸なし,個体識別P=バブル変量c,関数+,合成用保存* 【主要被災市町】 z,z, ,S,* // 縦軸z,横軸z,奥行軸なし,個体識別S,合成用保存* 【原点】 C,D, ,Q=C,* // 縦軸C,横軸D,奥行軸なし,個体識別Q=バブル変量C,合成用保存* 【兵庫県内市区】 // 合成（２次元図上の散布点と原点のリンク，３次元図圧縮を利用） ======================= $$ // 終了セクション