=============== ternary-cereal-cities-uc ============ ============ ユーザデータセクション $$u ----------------- クロスセクションデータ属性コマンド $c ---------- クロスセクションでは県名や企業名等の文字データを扱うことも多い． ---------- 各文字変量には漢字２文字（英字４文字）のみ入力される． ---------- それを超える文字は無視される． ---------文字系列変量名の先頭は「:n1,」「:n2,」…「:n6,」のいずれかを用いる 0001.00,0049.00,ss // ケース始点,終点番号 ,数値系列変量名;単位　穀類 ,bb // 空白で同一ケース範囲,数値系列変量名;単位　米 ,cc // 空白で同一ケース範囲,数値系列変量名;単位　パン ----------------- データ入力指示コマンド $d ctype // ケース毎に読むタイプ ------- ユーザ自身が文字・数値データを ------- テキストファイルまたはExcelシートからコピー＆ペーストされたい． ------- ユーザデータの各行の末尾にも「//」を挿入してコメント文を記述できる． ------- ★ユーザ文字・数値データをこの行直後にペーストする ★↓↓★ 86835 30485 32475 76464 27608 25413 84135 31372 29600 75933 22423 31604 78727 29489 27081 67072 27450 23113 90705 33957 35416 89454 34908 30774 71611 27383 26433 80200 27074 32180 79727 31640 25986 80490 23011 30348 72161 26231 26334 78136 31848 26009 76909 31693 24665 78791 32183 22010 73542 25234 28836 71277 27176 25331 75904 26739 22817 80935 29048 28838 79773 28527 29594 86786 36477 27814 81747 27540 33246 71480 25561 25497 79865 32085 24183 71884 27220 22737 88088 39140 27805 72771 25392 25338 80732 28204 29908 79097 29281 27686 83274 35238 25268 83044 31464 30676 86919 32426 32563 75899 30275 26343 82981 35744 27634 77888 31757 23296 76376 25438 29639 73557 25764 27566 81820 29596 30389 81132 29410 30633 87007 32861 31692 75328 34959 22686 88963 35715 27954 81439 32235 27318 81355 32248 28506 74886 30794 22860 81992 36958 25675 85099 32001 29246 83768 34616 29713 ================== 変量分析セクション $$v ----------------- 変量記号割当 $a s,ss //　穀類 b,bb // 米 c,cc // パン ----------------- 数値出力範囲 $d all // 全範囲 ------------------ $t // 変数変換コマンド ------------------- X,Y,Zの各変量と上記のa,b,cの入力変量とを対応させる X=(s-b-c) //　その他穀類 Y=(b) // 米 Z=(c) // パン ....... 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*(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 // 三角形の頂点と中点の三角グラフ平面への横軸変換 ------------------------ a=(0,0,70) // 小さい三角形の頂点と中点の座標 b=(0,70,0) c=(100,30,30) .... // @は @=(0*x) として定義済みで，原点の変量（ケースの数はデータ分） a=(@,a) // 原点の変量と小さい三角形の頂点と中点を連結した変量 b=(@,b) c=(@,c) --------------------- B=(b) // 小さい三角形の頂点の三角グラフ平面への縦軸変換 A=(2*a+b)/1.7320508 // 小さい三角形の頂点の三角グラフ平面への横軸変換 v=(-1.732,140) // 関数v Y=-1.732X+ (70*2) 小さい三角形の右辺 ========================= グラフセクション $$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,合成用保存* // 合成 $3 // 　小さい三角グラフ平面 B,A, ,Q,* // 縦軸B，横軸A，奥行軸なし，印字Q，合成用保存* Y,X, ,p=S,U,v,* // 縦軸Y,横軸X,奥行軸なし,印字p=バブル変量S,関数U,v,合成用保存* // 合成 ========================= 終了セクション $$