====================== ternary-kobe-io-demand ========== ===== ternary diagram ===== Kobe input-output demand items =============================================== $$u ----------------- クロスセクションデータ属性コマンド $c ---------- クロスセクションでは県名や企業名等の文字データを扱うことも多い． ---------- 各文字変量には漢字２文字（英字４文字）のみ入力される． ---------- それを超える文字は無視される． 0001.00,0034.00,:n1,産業 // ケース始点,終点番号 ,産業2文字系列名 ,x-variable // 空白で同一ケース範囲,数値系列変量名;単位 ,y-variable // 空白で同一ケース範囲,数値系列変量名;単位 ,z-variable // 空白で同一ケース範囲,数値系列変量名;単位 ----------------- データ入力指示コマンド $d ctype // ケース毎に読むタイプ ------- ユーザ自身が文字・数値データを ------- テキストファイルまたはExcelシートからコピー＆ペーストされたい． ------- ユーザデータの各行の末尾にも「//」を挿入してコメント文を記述できる． ------- ★ユーザ文字・数値データをこの行直後にペーストする ★↓↓★ 農林業 135124 39405 1674 酒類 24862 33715 198473 その他の食料品 161577 212783 406349 繊維・衣服 31410 59467 25774 製材・木製品・家具 64781 9256 11018 出版・印刷 105706 14448 64088 ゴム製品 29847 1445 58029 化学工業 227947 35434 107583 鉄鋼 181113 -9509 117972 金属製品 150024 443 85098 一般機械 125706 96103 226130 重電機器 25191 59055 152683 軽電機器 174208 221356 282024 造船 26803 -10939 133000 その他の輸送機械 71303 89802 111372 精密機械 10850 30289 13373 その他の製造業 361640 82465 151231 建設 50722 851538 0 電気・ガス・水道業 201745 115631 169 商業 394850 642681 641135 金融・保険 435453 121956 91389 不動産業 141883 726937 33313 港湾サービス業 59253 3114 193367 港湾以外の運輸 309744 224738 220133 通信・放送 198696 122297 133339 医療・保健・社会保障・介護 10693 555881 112033 その他の公共サービス 124367 431522 114473 対事業所サービス 733316 161454 187576 飲食店・宿泊業 0 406058 248683 その他の対個人サービス 40930 348196 160913 公務 9123 401281 0 事務用品 23489 0 0 その他 87557 18999 1293 分類不明 54414 320 14872 ================== 変量分析セクション $$v ----------------- 変量記号割当 $a N,:n1,産業 X,x-variable //　中間需要 Y,y-variable // 市内最終需要 Z,z-variable // 移輸出 ----------------- 数値出力範囲 $d all // 全範囲 ------------------ 変数変換 $t S=(X+Y+Z) // 総需要S x=(X/S)*100 // 中間需要構成比％ x y=(Y/S)*100 // 市内最終需要構成比％ y z=(Z/S)*100 // 移輸出構成比％ z p=:ci(x) // データの散布点印字用の文字系列p ............. =pr*(N,x,y,z,p) // 数値プリント f=(-1,-1,+100) // 関数f y= -x -z +100 （つまり x+y+z = 100） ............. i=(100,0,0,50,50,0) // 三角形の頂点と中点の座標 j=(0,100,0,0,50,50) k=(0,0,100,50,0,50) Q=:ci(i)****** // 三角形の頂点と中点の３次元図印字用の文字系列Q ------------------------　三角グラフ平面用に変換 Y=(y) // データのy変量の三角グラフ平面への縦軸変換 X=(2*x+y)/1.7320508 // データのx変量の三角グラフ平面への横軸変換 U=(1.732,0) // 関数U Y=1.732X+0 V=(-1.732,200) // 関数V Y=-1.732X+200 ............. 三角形の頂点と中点の座標 J=(j) // 三角形の頂点と中点の三角グラフ平面への縦軸変換 I=(2*i+j)/1.7320508 // 三角形の頂点と中点の三角グラフ平面への横軸変換 ========================= グラフセクション $$g ----------------- ゼロ軸表示 $z xyzXY // 変量xyzXY についてゼロ軸表示 ----------------- 目盛 $g X,001 // X変量の目盛 1間隔（標準は10間隔） Y,001 // Y変量の目盛 1間隔（標準は10間隔） ----------------- ３次元図 $3 // 　RGB表色３次元図バブルプロット j,i,k,Q,* // 縦軸j，横軸i，奥行軸k，散布点印字Q，合成用保存* y,x,z,p=S,f,* // 縦軸y，横軸x，奥行軸z，印字p=バブル変量S，関数f，合成用保存* // 合成 $3 // 　三色三角バブルグラフ J,I, ,Q,* // 縦軸J，横軸I，奥行軸なし，印字Q，合成用保存* Y,X, ,p=S,U,V,* // 縦軸Y,横軸X,奥行軸なし,印字p=バブル変量S,関数U,V,合成用保存* // 合成 ========================= 終了セクション $$