============= u-c-f5.txt $$b //ビジネス財務データセクション $f //処理対象企業フラグコマンド ==..(455)48,661,662,664,667,1615 //Jエナジー，日石,昭和シェル，三菱石,コスモ,ゼネラル石を日経会社コード順に指示 $n //企業名コマンド lst, //フラグｇの企業のリスト出力 :n1, //企業名の最初の漢字２文字 :n2, // 次の漢字２文字 :n3, // その次の漢字２文字 $p //原数値プリントコマンド ,090,095,097,098,103,127,158 //項番指示（最初の30社までプリント） $r //期間限定コマンド 9604,9703 //1996年４月〜1997年３月 $c //クロスセクションコマンド flw,090,,売上高 flw,095,,営業利益 flw,127,,当期利益 stk,078,,株主資本 ========================== $$u //ユーザデータセクション $c //クロスセクション属性指示コマンド 0001,0006,スタンド数 //ケース範囲,変量名;単位 $d //ユーザデータ内容入力コマンド ctype //データ内容パラメータ＜ケースごと記述タイプ＞ 6232 //Jエナジー ガソリンスタンド数1997年３月末 10018 //日石 出所：日本経済新聞1998.6.3 6937 //昭和シェル 4680 //三菱石 7048 //コスモ 2382 //ゼネラル石 $l //入力変量リスト ============================ $$v //変量分析セクション $a //変量記号割当コマンド N,:n1, //最初の企業名漢字２文字 A,:n2, //次の企業名漢字２文字 M,:n3, //その次の企業名漢字２文字 s,売上高 p,営業利益 i,当期利益 e,株主資本 c,スタンド数 $t //変数変換コマンド =pr*(N,A,M,s,p,i,e,c) //数値プリント r=(i/e)*100 //ROE F=(1,-1,log100) //関数ベクトルF P=:ci(s) //ケース識別文字系列 =pr*(N,A,M,r,P) //数値プリント ============================= $$g //グラフセクション $p //プロットコマンド r,c,s //ROE(r)，スタンド数(c)，売上高(s) $c //散布図コマンド r,c,*,P //ROE(r)，スタンド数(c)，回帰線(*)，ケース識別文字(P) $3 //３次元図コマンド r*i*e*P,F,* //縦軸r(対数*)，横軸i(対数*),奥行軸e(対数*)，印字(P)，重合せ保存(*) r,i,e,P,* //縦軸r，横軸i,奥行軸e，印字(P)，重ね合せ保存(*) //重ね合せ図 ======================= 終了セクション $$