=============== compare3-age-70over-rank50-items-region ============== ==== 70歳以上の件数上位50の商品サービス（小分類）別の ==== 近畿，東海，九州北部の相談件数の３地域ランキング比較図と重回帰 =============================================================================== $$u // ユーザデータ・セクション $c // クロスセクションデータ属性コマンド 0001.00,0050.00,aaa // ケース始点,終点番号 ,★第１系列名　近畿相談件数 ,bbb // 空白で同一ケース範囲,★第２系列名　東海相談件数 ,ccc // 空白で同一ケース範囲,★第３系列名　九州北部相談件数 $d // データ入力指示コマンド ctype // ケース毎に読むタイプ ------- ユーザ自身が文字・数値データを ------- テキストファイルまたはExcelシートからコピー＆ペーストする． ------- ユーザデータの各行の末尾にも「//」を挿入してコメント文を記述できる． ------- ★ユーザ文字・数値データをこの行直後にペーストする ★↓↓★ 2382 1538 2046 1857 1431 2107 1715 1266 1624 1881 1530 798 2134 382 1807 717 1030 1013 1118 782 551 1326 835 408 1163 617 700 929 725 787 996 683 656 897 448 726 1598 306 478 683 562 434 761 454 495 881 454 323 668 253 442 445 418 747 536 463 309 516 266 285 472 329 385 639 417 301 528 229 418 650 296 262 628 288 361 455 254 290 521 167 178 437 208 241 393 194 246 694 125 163 486 166 218 273 220 203 359 168 259 322 206 217 441 128 231 358 255 164 375 198 199 457 181 137 357 147 126 346 155 222 504 134 135 244 181 199 315 121 307 278 120 268 282 133 173 170 163 186 253 126 154 214 81 136 115 82 274 148 81 146 ====================== $$v // 変量分析セクション $a // 変量記号の割り当て z,aaa // 近畿相談件数に変量記号z y,bbb // 東海相談件数に変量記号y x,ccc // 九州北部相談件数に変量記号x ---------------- $d // 表示範囲コマンド all // 全範囲 ---------------- $t // 変数変換 x,nam,九州北部相談件数 // 変量xに変量名を付与 y,nam,東海相談件数 // 変量yに変量名を付与 z,nam,近畿相談件数 // 変量zに変量名を付与 ............ P=:ci(x) // 個体識別文字列P作成 I=r.g(x) // 九州北部相談件数xのランキング（大きい順の順序数） J=r.g(y) // 東海相談件数yのランキング（大きい順の順序数） K=r.g(z) // 近畿相談件数zのランキング（大きい順の順序数 ............ I,nam,九州北部ランキング // 変量Jに変量名を付与 J,nam,東海ランキング // 変量Kに変量名を付与 K,nam,近畿ランキング // 変量Kに変量名を付与 =pr*(x,I,y,J,z,K,P) // 数値プリント -------------- $r // 回帰コマンド F,@"*,z=(y,x) // 変量zを変量y,xで説明する重回帰の係数ベクトルF g,est,z=(y,x) // 変量zを変量y,xで説明する重回帰の推定値g =============== $$g // グラフセクション $d // 表示範囲 all // 全範囲 $p // プロット xyz // 変量x，y，zを同一スケールでプロット $c // 散布図コマンド z,x,*,P //■図2 【散布図(相関図)】 縦軸z，横軸x，回帰線あり*，散布点印字P z,y,*,P //■図3 【散布図(相関図)】 縦軸z，横軸y，回帰線あり*，散布点印字P $3 // ３次元図コマンド z,K, ,P=z,* // 縦軸y，横軸K，奥行軸なし,散布点印字P=バブルz,合成用保存* y,J, ,P=y,* // 縦軸y，横軸J，奥行軸なし,散布点印字P=バブルy,合成用保存* x,I, ,P=x,* // 縦軸x，横軸I，奥行軸なし,散布点印字P=バブルx,合成用保存* // 合成 ■図7 【バブル散布図立体比較】 $3 // ３次元図コマンド z,y,x,P=z,F,* // 縦軸z，横軸y，奥行軸x,散布点印字P=バブルz,関数F,合成用保存* g,y,x,P,* // 縦軸g，横軸y，奥行軸x,散布点印字P,合成用保存* // 合成 ■図10【バブル三次元図】 ======================= $$ // 終了セクション