=============== ternary-nutrients-uc ============ ============ ユーザデータセクション $$u ----------------- $c // クロスセクションデータ属性コマンド ---------- クロスセクションでは県名や企業名等の文字データを扱うことも多い． ---------- 各文字変量には漢字２文字（英字４文字）のみ入力される． ---------- それを超える文字は無視される． ---------- 文字系列変量名の先頭は「:n1,」「:n2,」…「:n6,」のいずれかを用いる ---------- 識別文字系列変量名の先頭は「:ci,」を用いる 0001.00,0012.00,aa // ケース始点,終点番号 ,数値系列変量名;単位　蛋白質 ,bb // 空白で同一ケース範囲,数値系列変量名;単位　脂質 ,cc // 空白で同一ケース範囲,数値系列変量名;単位　炭水化物 ----------------- データ入力指示コマンド $d ctype // ケース毎に読むタイプ ------- ユーザ自身が文字・数値データを ------- テキストファイルまたはExcelシートからコピー＆ペーストされたい． ------- ユーザデータの各行の末尾にも「//」を挿入してコメント文を記述できる． ------- ★ユーザ文字・数値データをこの行直後にペーストする ★↓↓★ 8.3 13.7 54.7 5.4 15.2 23.7 12.9 5.6 63.3 12.4 1.5 84.3 13.4 2.3 87.1 5.7 13.1 44.8 13.2 0.4 72 8.7 1.1 72.7 4.9 3.1 31 19.4 19.7 85.5 17.8 10.4 78.3 13.7 9.3 73.4 ================== 変量分析セクション $$v ----------------- 変量記号割当 $a a,aa //　蛋白質 b,bb // 脂質 c,cc // 炭水化物 ----------------- $d // 数値出力範囲 all // 全範囲 ------------------ $t // 変数変換コマンド ------------------- ★ X,Y,Zの各変量と上記のa,b,cの入力変量とを対応させる X=(a) //　蛋白質 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,50) // ★中三角形の場合は a=(0,0,70) b=(0,50,0) // ★ b=(0,70,0) c=(100,50,50) // ★ c=(100,30,30) .... // @は @=(0*x) として定義済みで，原点の変量（ケースの数はデータ分） a=(@,a) // 原点の変量と小さい三角形の頂点を連結した変量 b=(@,b) c=(@,c) --------------------- B=(b) // 小さい三角形の頂点の三角グラフ平面への縦軸変換 A=(2*a+b)/1.7320508 // 小さい三角形の頂点の三角グラフ平面への横軸変換 v=(-1.732,100) // 小三角形の右辺関数v Y=-1.732X+ (50*2) ★中三角形の場合 v=(-1.732,140) ========================= グラフセクション $$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,合成用保存* // 合成 ========================= 終了セクション $$