====================== ternary-tottori-io-demand ========== ===== ternary diagram ===== Tottori input-output demand item =============================================== $$u ----------------- クロスセクションデータ属性コマンド $c ---------- クロスセクションでは県名や企業名等の文字データを扱うことも多い． ---------- 各文字変量には漢字２文字（英字４文字）のみ入力される． ---------- それを超える文字は無視される． 0001.00,0034.00,:n1,産業 // ケース始点,終点番号 ,産業2文字系列名 ,x-variable // 空白で同一ケース範囲,数値系列変量名;単位 ,y-variable // 空白で同一ケース範囲,数値系列変量名;単位 ,z-variable // 空白で同一ケース範囲,数値系列変量名;単位 ----------------- データ入力指示コマンド $d ctype // ケース毎に読むタイプ ------- ユーザ自身が文字・数値データを ------- テキストファイルまたはExcelシートからコピー＆ペーストされたい． ------- ユーザデータの各行の末尾にも「//」を挿入してコメント文を記述できる． ------- ★ユーザ文字・数値データをこの行直後にペーストする ★↓↓★ 農業 58639 17467 34931 林業 11048 5142 1373 漁業 19342 6353 10491 鉱業 13153 -24 546 食料品 75825 143611 249626 繊維製品 44957 26251 58869 パルプ・紙・木製品 94522 9016 104616 化学製品 59791 15825 229 石油・石炭製品 52091 37534 409 窯業・土石製品 44650 1239 3139 鉄鋼 33924 -451 5407 非鉄金属 25225 564 1185 金属製品 51626 3093 19324 一般機械 31588 56472 48799 電気機械 209621 92724 430149 輸送機械 19860 41631 19591 精密機械 3291 12800 744 その他の製造工業製品 84419 26025 26162 建設 30878 395845 0 電力・ガス・熱供給 51151 12946 413 水道・廃棄物処理 17721 13194 0 商業 136620 269196 34812 金融・保険 79266 58789 9168 不動産 17421 232617 52 運輸 133364 46657 21899 通信・放送 49758 36831 8709 公務 3430 212358 0 教育・研究 20280 132316 763 医療・保健・社会保障・介護 3731 246530 0 その他の公共サービス 4175 25402 0 対事業所サービス 190278 46164 18473 対個人サービス 13859 190775 35877 事務用品 7189 0 0 分類不明 17032 929 6 ================== 変量分析セクション $$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 // X変量の目盛 1間隔（標準は10間隔） ----------------- ３次元図 $3 // 　三角グラフ立体 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,合成用保存* // 合成 ========================= 終了セクション $$