=========== skyline-city-east-japan-earthquake-human-damage2012-01 ================= ====== 東日本大震災の主要被災市町の人的被害人口比の ====== スカイライン図・扇形散布図 2012年１月13日現在 =============================================================================== $$u // ユーザデータ・セクション $c // クロスセクションデータ属性コマンド 0001.00,0043.00,ddd // ケース始点,終点番号 ,★第１系列名　浸水域人口 ,xxx // 空白で同一ケース範囲,★第２系列名　人的被害 $d // データ入力指示コマンド ctype // ケース毎に読むタイプ ------- ユーザ自身が文字・数値データを ------- テキストファイルまたはExcelシートからコピー＆ペーストする． ------- ユーザデータの各行の末尾にも「//」を挿入してコメント文を記述できる． ------- ★ユーザ文字・数値データをこの行直後にペーストする ★↓↓★ 5229 2 1924 2 3820 0 1189 0 18378 534 19073 427 7171 4 16640 1852 13164 1056 11915 1307 11418 769 1137 7 1582 29 1115 1 3177 38 2733 0 29962 730 112276 3777 18718 32 40331 1373 12155 967 17144 189 8051 183 34014 1113 14080 269 8990 690 4053 2 9149 75 542 46 8048 936 14389 876 32520 348 10436 458 13377 646 1385 3 1746 25 1401 73 1127 41 1278 54 3356 184 4666 114 7212 6 8303 15 ====================== $$v // 変量分析セクション $a // 変量記号の割り当て d,ddd // d 浸水域人口 x,xxx // x 人的被害 ---------------- $d // 表示範囲 all // 全範囲 ---------------- $t // 変数変換 s=(x)/d*100 // 比率 P=:ci(x) // 個体識別文字列P作成 =pr*(d,x,s,P) // 数値プリント .................... q=cum(d) // 浸水域人口の累和 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,5) // 比率5% の線 y=5=0*x+5 の右辺係数 [0,5] の関数「.」 +=(0.05,0) // 散布図の斜線 y=0.05x+0 の右辺係数 [0.05,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を別スケール ------------ 人的被害浸水域人口比　------------------------------------- $3 // ３次元図　スカイライン図 s,q, ,P,.,* // 縦軸s,横軸q,奥行軸なし,個体識別P,関数.,合成用保存* s,r, ,P,* // 縦軸s,横軸r,奥行軸なし,個体識別P,合成用保存* // 合成 人的被害浸水域人口比スカイライン図（リンク縦面描画，３次元図圧縮） ........ $3 // ３次元図　扇形散布図 x,d, ,P,+,* // 縦軸x,横軸d,奥行軸なし,個体識別P,関数+,合成用保存* z,z, ,P,* // 縦軸z,横軸z,奥行軸なし,個体識別P,合成用保存*【原点】 // 合成（散布点と原点のリンク直線描画，３次元図圧縮を利用） ======================= $$ // 終了セクション