=============== ternary-age-70over-rank50-items-content ================== ==== 70歳以上の相談内容回答数上位50の商品サービス（小分類）別の ==== 相談内容３区分構成比の三色三角バブルグラフ ========================================================================== $$u // ユーザデータ・セクション $c // クロスセクションデータ属性コマンド 0001.00,0050.00,aa // ケース始点,終点番号 ,第１系列変量名;単位　販売方法相談内容数 ,bb // 空白で同一ケース範囲,第２系列変量名;単位　契約解約相談内容数 ,cc // 空白で同一ケース範囲,第３系列変量名;単位　他の相談内容数 ----------------- データ入力指示コマンド $d ctype // ケース毎に読むタイプ ------- ユーザ自身が文字・数値データを ------- テキストファイルまたはExcelシートからコピー＆ペーストされたい． ------- ユーザデータの各行の末尾にも「//」を挿入してコメント文を記述できる． ------- ★ユーザ文字・数値データをこの行直後にペーストする ★↓↓★ 8846 13247 3616 8621 9897 6084 1316 15304 5912 9301 8515 2629 6843 6991 3712 6495 8918 2056 3044 4552 6106 6200 5325 1959 6082 5079 1714 2740 5769 3058 2747 4793 3317 5402 2925 2466 3238 3357 2852 3952 3510 1354 3528 4050 1022 314 3632 3213 2250 2774 2119 1929 3840 1362 2757 2948 853 2227 2435 1479 2323 2387 1259 2193 2259 1397 1892 2404 1189 1023 2871 1436 1340 1840 1958 1728 1633 1358 1312 1789 1513 557 1530 2354 1011 1716 1622 720 1943 1643 1576 2139 515 1125 1634 1464 1179 1399 1570 938 1446 1604 1412 1749 787 301 951 2611 404 1922 1381 1512 1609 450 1580 1139 825 1513 1543 461 47 572 2775 967 1420 869 806 1225 1125 373 1006 1745 347 1226 1458 1130 1121 661 314 959 1595 389 1446 1028 607 902 1007 416 1204 891 ================== 変量分析セクション $$v ----------------- 変量記号割当 $a a,aa //　販売方法相談内容数 b,bb // 契約解約相談内容数 c,cc // 他の相談内容数 ----------------- $d // 数値出力範囲 all // 全範囲 ------------------ $t // 変数変換コマンド ------------------- ★ X,Y,Zの各変量と上記のa,b,cの入力変量とを対応させる Y=(c) //　他の相談内容数 X=(a) // 販売方法相談内容数 Z=(b) // 契約解約相談内容数 ....... S=(X+Y+Z) // 合計 S　外側バブル変量 ....... L=(X+Z) // ★内側バブル変量として選択 「販売方法」と「契約解約」の相談内容回答数計 ....... x=(X/S)*100 // 販売方法相談内容構成比 x y=(Y/S)*100 // 他の相談内容数構成比％ y z=(Z/S)*100 // 契約解約相談内容数構成比％ z p=:ci(x) // データの散布点印字用の文字系列p ............. =pr*(X,Y,Z,S,x,y,z,p) // 数値プリント -------------------- $r // 回帰コマンド ,run,y=(x,z) // 被説明変数y，説明変数x,zによる重回帰の計測 ,run,Y=(X,Z) // 被説明変数Y，説明変数X,Zによる重回帰の計測 -------------------- $t // 変数変換コマンド f=(-1,-1,+100) // 関数f y= -x -z +100 （つまり x+y+z = 100） ............. i=(100,50,0,0,0,50) // 三角形の頂点と中点の座標 j=(0,50,100,50,0,0) k=(0,0,0,50,100,50) Q=:ci(i)****** // 三角形の頂点と中点の３次元図印字用の文字系列Q ............. @=(0*x) // 原点の変量（ケースの数はデータ分） i=(@,i) // 原点の変量と三角形の頂点と中点を連結した変量 j=(@,j) k=(@,k) Q=(p,Q) // データの散布点印字変量pと頂点と中点の印字変量Qの連結 Q,nam,:ci,Q=(p,Q) // 変量Qが印字文字系列であることを示す変量名に再設定 .... =pr*(i,j,k,Q) // 数値プリントしてチェックするには先頭....を取る ------------------------　三角グラフ平面用に変換 Y=(y) // データの三角グラフ平面への縦軸変換 X=(2*x+y)/1.7320508 // データの三角グラフ平面への横軸変換 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 // 　三角グラフ立体 y,x,z,p=S,f,* // 縦軸y，横軸x，奥行軸z，印字p=バブル変量S，関数f，合成用保存* y,x,z,p=L,f,* // 縦軸y，横軸x，奥行軸z，印字p=バブル変量L，関数f，合成用保存* j,i,k,Q,* // 縦軸j，横軸i，奥行軸k，散布点印字Q，合成用保存* // 合成 $3 // 　三角グラフ平面 Y,X, ,p=S,U,V,* // 縦軸Y,横軸X,奥行軸なし,印字p=バブル変量S,関数U,V,合成用保存* Y,X, ,p=L,U,V,* // 縦軸Y,横軸X,奥行軸なし,印字p=バブル変量L,関数U,V,合成用保存* J,I, ,Q,* // 縦軸J，横軸I，奥行軸なし，印字Q，合成用保存* // 合成 ========================= 終了セクション $$