==== skyline2-east-japan-earthquake-meiji-sanriku-human-damage ====================== ==== 東日本大震災の人的被害浸水域人口比と ==== 明治三陸津波の人的被害人口比の合成スカイライン図・合成扇形散布図 ========================================================================== $$u // ユーザデータ・セクション ---------------------　東日本大震災分 ------------------------ $c // クロスセクションデータ属性コマンド 0001.00,0043.00,aaa // ケース始点,終点番号 ,★第１系列名　浸水域人口 ,bbb // 空白で同一ケース範囲,★第２系列名　人的被害 $d // データ入力指示コマンド ctype // 変量毎に読むタイプ ------- ユーザ自身が文字・数値データを ------- テキストファイルまたはExcelシートからコピー＆ペーストする． ------- ユーザデータの各行の末尾にも「//」を挿入してコメント文を記述できる． ------- ★ユーザ文字・数値データをこの行直後にペーストする ★↓↓★ 5229 2 1924 2 3820 0 1189 0 18378 901 19073 463 7171 4 16640 2203 13164 1355 11915 1711 11418 938 1137 7 1582 36 1115 1 3177 38 2733 0 29962 860 112276 5734 18718 22 40331 1533 12155 1052 17144 188 8051 186 34014 1769 14080 273 8990 749 4053 4 9149 76 542 4 8048 1156 14389 1173 32520 383 10436 469 13377 938 1385 3 1746 13 1401 11 1127 44 1278 35 3356 186 4666 115 7212 6 8303 15 ---------------------　明治三陸津波分 ------------------------ $c // クロスセクションデータ属性コマンド 0001.00,0043.00,ccc // ケース始点,終点番号 ,★第３系列名　人口 ,ddd // 空白で同一ケース範囲,★第４系列名　人的被害 $d // データ入力指示コマンド ctype // 変量毎に読むタイプ ------- ユーザ自身が文字・数値データを ------- テキストファイルまたはExcelシートからコピー＆ペーストする． ------- ユーザデータの各行の末尾にも「//」を挿入してコメント文を記述できる． ------- ★ユーザ文字・数値データをこの行直後にペーストする ★↓↓★ #N/A #N/A #N/A #N/A #N/A #N/A #N/A #N/A 18093 3071 11995 3174 4404 487 4257 818 12665 6477 6983 600 9844 2119 820 364 529 232 925 302 1352 260 4247 254 #N/A #N/A 7875 271 #N/A #N/A 12178 1887 #N/A #N/A #N/A #N/A #N/A #N/A #N/A #N/A #N/A #N/A #N/A #N/A #N/A #N/A #N/A #N/A #N/A #N/A 2521 1 7148 1234 #N/A #N/A #N/A #N/A #N/A #N/A #N/A #N/A #N/A #N/A #N/A #N/A #N/A #N/A #N/A #N/A #N/A #N/A #N/A #N/A #N/A #N/A #N/A #N/A ====================== $$v // 変量分析セクション $a // 変量記号の割り当て a,aaa // 　東日本大震災の浸水域人口 b,bbb // 　 　　　人的被害 c,ccc // 　明治三陸津波の人口 d,ddd // 　　　人的被害 ---------------- $d // 表示範囲 all // 全範囲 ---------------- $t // 変数変換 k=(b/a*100) // 東日本大震災の人的被害浸水域人口比　％ l=(d/c*100) // 明治三陸津波の人的被害人口比　％ .................. P=:ci(a) // 東日本大震災の部門識別文字列P作成 Q=:ci(c) // 明治三陸津波の部門識別文字列Q作成 =pr*(a,b,c,d,k,l,P,Q) // 数値プリント .................... i=max(a) //　東日本大震災の浸水域人口の最大値maxのスカラーi（区切りに利用） i=(i*0.3) //　 ★スカラーi（区切りに利用）は幅が大きくなるので30%に縮小 I=:ci(i)* //　スカラーiに文字 "*" の文字列変量I　作成（スカイライン区切りに利用） ?Y=(a,i,c) //　浸水域人口・人口　東日本大震災分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=(5) // ★ h 人的被害(浸水域)人口比 5％　　 .=(0,h) // スカイライン図上の人的被害(浸水域)人口比 5％の横線 y=0*x+h の右辺係数の関数「.」 +=(h/100,0) // 散布図の人的被害(浸水域)人口比 h％の斜線 y=(h/100)*x+0 の右辺係数の関数「+」 ............ 最大ケース(最大部門数）の変量zを作成 z=csl(a,c) // 変量aと変量cの統合（aの欠測ケースにはcの数値を採用） z=(0*a) // 最大ケースの変量zの全ケースにゼロの数値（扇形散布図の原点に利用） S=:ci(z) // 最大ケースの変量zの識別文字列S作成 =============== $$g // グラフセクション $d // 表示範囲 all // 全範囲 $g // スケールの目盛り指示コマンド（標準10ポイント） ?K,001 // 変量?Kの目盛りを細かく1ポイントごとに b,001 // 変量b の目盛りを細かく1ポイントごとに $z // ゼロ軸表示 ?Kbd // 変量?K,b,dのゼロ軸表示 ---------------------- 人的被害(浸水域)人口比 ------------ $3 // ３次元図　人的被害(浸水域)人口比スカイライン図　　　横幅：(浸水域)人口 ?K,q, ,?P,.,* // 縦軸?K,横軸q,奥行軸なし,個体識別?P,関数.,合成用保存* ?K,r, ,?P,* // 縦軸?K,横軸r,奥行軸なし,個体識別?P,合成用保存* // 合成 人的被害(浸水域)人口比スカイライン図（リンク面描画，３次元図圧縮） ........ $3 // ３次元図　扇形散布図 縦軸：人的被害 横軸：(浸水域)人口 b,a, ,P=b,+,* // 縦軸b,横軸a,奥行軸なし,個体識別P=バブル変量b,関数+,合成用保存* 【東日本大震災】 z,z, ,S,* // 縦軸z,横軸z,奥行軸なし,個体識別S,合成用保存* 【原点】 d,c, ,Q=d,* // 縦軸d,横軸c,奥行軸なし,個体識別Q=バブル変量d,合成用保存* 【明治三陸津波】 // 合成（２次元図上の散布点と原点のリンク，３次元図圧縮を利用） ======================= $$ // 終了セクション