=============== fan-shaped-bread-value-quantity-cities-uc ============= ==== 食パンの購入額・購入数量 スカイライン図・扇形散布図 都道府県庁所在市別 ========================================================================== ================== $$u // ユーザデータ・セクション $c // クロスセクションデータ属性コマンド 0001.00,0049.00,aaa // ケース始点,終点番号 ,★第１系列名 ,bbb // 空白で同一ケース範囲,★第２系列名 $d // データ入力指示コマンド ctype // ケース毎に読むタイプ ------- ユーザ自身が文字・数値データを ------- テキストファイルまたはExcelシートからコピー＆ペーストする． ------- ユーザデータの各行の末尾にも「//」を挿入してコメント文を記述できる． ------- ★ユーザ文字・数値データをこの行直後にペーストする ★↓↓★ 10812 24863 10827 24821 10550 24625 11371 24522 10972 24503 12067 24216 10790 23925 10289 23721 10274 23582 10195 23494 10590 22880 9513 22739 10347 21999 9907 21929 9687 21795 8852 21769 10192 21486 9774 21390 9765 21101 10407 21044 9143 20680 9204 20589 9257 20523 8587 19512 9295 19452 8665 19430 8955 19214 7797 17910 8118 17862 8141 17790 7472 17517 7897 17478 7575 17323 7806 17269 8255 17199 7409 17114 7529 16760 8072 16692 7644 16610 7443 16421 7071 16218 6354 15782 6828 15506 6756 15473 6820 15175 6342 15101 6752 14920 6572 14002 5294 12609 ====================== $$v // 変量分析セクション $a // 変量記号の割り当て y,aaa x,bbb ---------------- $d // 表示範囲 all // 全範囲 ---------------- $t // 変数変換 s=(y)/x // 比率　この場合　価格 = 金額 / 数量 P=:ci(y) // 個体識別文字列P作成 =pr*(y,x,s,P) // 数値プリント .................... q=cum(x) // xの累和 q<i>=x<1>+x<2>+...+x<i-1>+x<i> r=(q-x) // 直前までの累和 r<i>=x<1>+x<2>+...+x<i-1> =q<i>-x<i> .................... h=(8466/19237) // ★ h 全国平均比率（価格） = 金額 / 数量 = (8466/19237) .=(0,h) // スカイライン図上の比率 h の横線 y=0*x+h の右辺係数 [0,h] の関数「.」 +=(h,0) // 扇形散布図上の比率 h の斜線 y=h*x+0 の右辺係数 [h,0] の関数「+」 z=(0*y) // すべてゼロの数値の変量zを作成（ 扇形散布図の原点に利用） $r // 回帰分析 ,run,y=(x) // yを被説明（従属）変数とし，xを説明（独立）変数とする回帰 =============== $$g // グラフセクション $d // 表示範囲 all // 全範囲 $g // スケールの目盛り指示コマンド（標準10ポイント） s,002 // 変量sの目盛りを細かく2ポイントごとに y,002 x,002 $z // ゼロ軸表示 syx // 変量s,y,xのゼロ軸表示 $p // プロット x,y,s // 変量x,y,sをを別スケール ------------ 比率　------------------------------------- $3 // ３次元図　スカイライン図 s,q, ,P,.,* // 縦軸s,横軸q,奥行軸なし,個体識別P,関数.,合成用保存* s,r, ,P,* // 縦軸s,横軸r,奥行軸なし,個体識別P,合成用保存* // 合成 比率スカイライン図（リンク面描画，３次元図圧縮） ........ $3 // ３次元図　扇形散布図 y,x, ,P,+,* // 縦軸y,横軸x,奥行軸なし,個体識別P,関数+,合成用保存* z,z, ,P,* // 縦軸z,横軸z,奥行軸なし,個体識別P,合成用保存【原点】 // 合成（２次元図上の散布点と原点のリンク，３次元図圧縮を利用） ======================= $$ // 終了セクション

［← 叢書2010の目次に戻る］