=========== skyline-city-east-japan-earthquake-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 ====================== $$v // 変量分析セクション $a // 変量記号の割り当て a,aaa // a 2010年年少人口 b,bbb // b 2010年生産年齢人口 c,ccc // c 2010年老年人口 ---------------- $d // 表示範囲 all // 全範囲 ---------------- $t // 変数変換 d=(a+b+c) // d 2010年人口（年齢不詳をの除く） x=(c) // x 2010年老年人口 s=(x)/d*100 // 比率 P=:ci(x) // 個体識別文字列P作成 =pr*(a,b,c,d,x,s,P) // 数値プリント .................... q=cum(d) // 2010年人口の累和 q<i>=d<1>+d<2>+...+d<i-1>+d<i> r=(q-d) // 直前までの累和 r<i>=d<1>+d<2>+...+d<i-1> =q<i>-d<i> .................... .=(0,20) // 比率20の線 y=20=0*x+20 の右辺係数 [0,20] の関数「.」 -=(0,30) // 比率30の線 y=30=0*x+30 の右辺係数 [0,30] の関数「-」 +=(0.2,0) // 散布図の斜線 y=0.2x+0 の右辺係数 [0.2,0] の関数「+」 z=(0*x) // すべてゼロの数値の変量zを作成（図の原点に利用） =============== $$g // グラフセクション $d // 表示範囲 all // 全範囲 $g // スケールの目盛り指示コマンド（標準10ポイント） s,001 // 変量sの目盛りを細かく1ポイントごとに x,001 $z // ゼロ軸表示 sd // 変量s,dのゼロ軸表示 $p // プロット xd,s // 変量x,dを同一スケールで，変量sを別スケール ------------ 2010年老年人口比　------------------------------------- $3 // ３次元図　スカイライン図 s,q, ,P,.,-,* // 縦軸s,横軸q,奥行軸なし,個体識別P,関数「.」「-」，合成用保存* s,r, ,P,* // 縦軸s,横軸r,奥行軸なし,個体識別P,合成用保存* // 合成 2010年老年人口比スカイライン図（リンク縦面描画，３次元図圧縮） ........ $3 // ３次元図　扇形散布図 x,d, ,P=x,+,* // 縦軸x,横軸d,奥行軸なし,個体識別P,関数+,合成用保存* z,z, ,P,* // 縦軸z,横軸z,奥行軸なし,個体識別P,合成用保存*【原点】 // 合成（散布点と原点のリンク直線描画，３次元図圧縮を利用） ======================= $$ // 終了セクション