=========== skyline-city-east-japan-earthquake-population-shift ========= ====== 東日本大震災の主要被災市町の人口の増減の ====== スカイライン図・扇形散布図 =============================================================================== $$u // ユーザデータ・セクション $c // クロスセクションデータ属性コマンド 0001.00,0043.00,xxx // ケース始点,終点番号 ,★第１系列名　2010年人口 ,ddd // 空白で同一ケース範囲,★第２系列名　2005年人口 ,eee // 空白で同一ケース範囲,★第２系列名　2005年老年人口 $d // データ入力指示コマンド ctype // ケース毎に読むタイプ ------- ユーザ自身が文字・数値データを ------- テキストファイルまたはExcelシートからコピー＆ペーストする． ------- ユーザデータの各行の末尾にも「//」を挿入してコメント文を記述できる． ------- ★ユーザ文字・数値データをこの行直後にペーストする ★↓↓★ 237473 244700 47912 41260 42425 7692 24188 24172 4472 14702 15356 2764 59442 63588 17325 40738 43331 11716 36875 39141 9290 23302 24709 7528 39578 42987 13411 15277 16516 4705 18625 20142 5651 10804 11914 4084 3843 4241 1274 3088 3358 936 4632 5019 1344 17910 19524 5205 1045903 1025126 161795 160704 167324 40435 56490 59357 13943 73494 78011 20931 73140 68662 11876 62979 62717 9600 44198 43921 7703 42908 43235 8849 34846 35132 7226 16711 17713 4918 15089 16193 4320 20419 21068 3847 34000 32257 4456 10051 10723 3217 17431 18645 5147 342198 354492 79472 37796 38630 9221 70895 72837 17836 5418 5533 1244 7701 8188 1976 15996 15910 3156 11511 10992 2232 6932 7170 1754 20908 21615 5203 8218 8584 2188 47026 49645 11439 69074 70643 15645 ====================== $$v // 変量分析セクション $a // 変量記号の割り当て x,xxx // x 2010年人口 d,ddd // d 2005年人口 e,eee // e 2005年老年人口 ---------------- $d // 表示範囲 all // 全範囲 ---------------- $t // 変数変換 s=(x)/d*100 // 人口2010年／2005年比 P=:ci(x) // 個体識別文字列P作成 =pr*(d,x,s,P) // 数値プリント .................... q=cum(d) // 2005年人口の累和 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,100) // 比率100の線 y=100=0*x+100 の右辺係数 [0,100] の関数「.」 +=(1,0) // 散布図の45度線 y=x+0 の右辺係数 [1,0] の関数「+」 z=(0*x) // すべてゼロの数値の変量zを作成（図の原点に利用） .................... u=(x-d) // 人口増減数(u) = 2010年人口(x) - 2005年人口(d) h=(u)/d*100 // 人口増減率h .................... k=(e)/d*100 // 2005年老年人口比k =pr*(u,d,h,e,k,P) // 数値プリント ---------------- $r // 回帰分析 F,@"*,h=(k) // 人口増減率h の 2005年老年人口比k による回帰係数F =============== $$g // グラフセクション $d // 表示範囲 all // 全範囲 $g // スケールの目盛り指示コマンド（標準10ポイント） s,002 // 変量sの目盛りを細かく2ポイントごとに x,002 h,002 u,002 $z // ゼロ軸表示 sdh // 変量s,d,hのゼロ軸表示 $p // プロット xd,s // 変量x,dを同一スケールで，変量sを別スケール xd,u,h // 変量x,dを同一スケールで，変量u，hを各々別スケール ------------ 人口2010年／2005年比　------------------------------------- $3 // ３次元図　スカイライン図 s,q, ,P,.,* // 縦軸s,横軸q,奥行軸なし,個体識別P,関数.,合成用保存* s,r, ,P,* // 縦軸s,横軸r,奥行軸なし,個体識別P,合成用保存* // 合成 人口2010年／2005年比スカイライン図（リンク縦面描画，３次元図圧縮） ........ $3 // ３次元図　扇形散布図 x,d, ,P,+,* // 縦軸x,横軸d,奥行軸なし,個体識別P,関数+,合成用保存* z,z, ,P,* // 縦軸z,横軸z,奥行軸なし,個体識別P,合成用保存【原点】 // 合成（散布点と原点のリンク直線描画，３次元図圧縮を利用） ------------ 人口増減率　------------------------------------------------ $3 // ３次元図　スカイライン図 h,q, ,P,* // 縦軸h,横軸q,奥行軸なし,個体識別P,合成用保存* h,r, ,P,* // 縦軸h,横軸r,奥行軸なし,個体識別P,合成用保存* // 合成 増減率スカイライン図（リンク縦面描画，３次元図圧縮） ........ $3 // ３次元図　扇形散布図 u,d, ,P,* // 縦軸u,横軸d,奥行軸なし,個体識別P,合成用保存* z,z, ,P,* // 縦軸z,横軸z,奥行軸なし,個体識別P,合成用保存*【原点】 // 合成（２次元図上の散布点と原点のリンク，３次元図圧縮を利用） ------------ 人口増減率と老年人口比　--------------------------------- $c // 散布図 h,k,*,P // 縦軸h,横軸k,回帰線表示*,個体識別P $3 // ３次元図 バブル散布図 h,k, ,P=x,F // 縦軸h,横軸k,奥行軸なし,個体識別P=バブル変量x,関数F ======================= $$ // 終了セクション