========= skyline-telemarketing-rank20-items-age-over60-2015part-bubble ====== ====== 電話勧誘販売の件数上位20商品サービス（中分類）別消費生活相談の60歳以上比率の ====== 昇順スカイライン図・扇形バブル散布図 ================================================================================= $$u // ユーザデータ・セクション $c // クロスセクションデータ属性コマンド 0001.00,0020.00,ddd // ケース始点,終点番号 ,★第１系列名　分母 相談件数合計 ,xxx // 空白で同一ケース範囲,★第２系列名　分子 60歳以上件数 $d // データ入力指示コマンド ctype // ケース毎に読むタイプ ------- ユーザ自身が文字・数値データを ------- テキストファイルまたはExcelシートからコピー＆ペーストする． ------- ユーザデータの各行の末尾にも「//」を挿入してコメント文を記述できる． ------- ★ユーザ文字・数値データをこの行直後にペーストする ★↓↓★ 6261 2577 1964 1413 1604 968 1166 1039 967 841 961 832 655 461 599 494 593 537 423 124 410 346 342 38 282 175 282 62 222 19 218 155 208 115 183 120 182 124 174 109 $l // 入力変量のリスト出力コマンド ====================== $$v // 変量分析セクション $a // 変量記号の割り当て d,ddd // d 分母 x,xxx // x 分子 ---------------- $d // 表示範囲 all // 全範囲 ---------------- $t // 変数変換 $$v // 変量分析セクション $a // 変量記号の割り当て d,ddd // d 分母 x,xxx // x 分子 ---------------- $d // 表示範囲 all // 全範囲 ---------------- $t // 変数変換 U=(100) // ★比率の表示単位 百分率100 q=(x/d)*U // 比率q t=t..(x) // 順序数（第1ケース1，第2ケース2，第3ケース3，…） j=r.l(q)blank // ★選択変量（ここではq）での順位（昇順）j blankで 欠落値も最後の順位をつける m=:ci(d) // 個体識別文字列m作成 =pr*(t,d,x,q,j,m) // 数値プリント ............................... e=pmt(d,j) // 順位jで並び替え後の 分母e y=pmt(x,j) // 順位jで並び替え後の 分子y r=pmt(q,j) // 順位jで並び替え後の 比率r n=pmt(m,j) // 順位jで並び替え後の 個体識別文字n n,nam,:ci,n=pmt(m,j) // 並び替え後の個体識別変量nを文字列を示す変量名（先頭「:ci,」）に変更 =pr*(e,y,r,n) // 数値プリント ................................ f=cum(e) // 累積分母f f<i>=e<1>+e<2>+...+e<i-1>+e<i> g=(f-e) // １つ前までの累積分母 g<i>=e<1>+e<2>+...+e<i-1> =f<i>-e<i> a=@.s(d) // 分母合計a（スカラー） u=@.s(x) // 分子合計u（スカラー） s=(u/a) // 全体比率s（スカラー） =pr*(a,u,s) // 数値プリント ................................ >=(0,s*U) // 全体比率s（スカラー）（表示単位U）の横線 y=0*x+s*U の右辺係数 [0,s*U] の関数「>」 ^=(s,0) // 扇形バブル散布図の比率の斜線 y=s*x+0 の右辺係数 [s,0] の関数「^」 o=(0*x) // すべてゼロの数値の変量oを作成（図の原点に利用） =============== $$g // グラフセクション $g // スケールの目盛り指示コマンド（標準10ポイント） r,001 // 変量rの目盛りを細かく1ポイントごとに y,001 $z // ゼロ軸表示　なおゼロ軸表示を抑止するには，この行および次行の先頭に「//」を挿入 ry // 変量r y のゼロ軸表示 ------------------------------------------------- $3 // ３次元図　昇順スカイライン図 r,f, ,n,>,* // 縦軸r,横軸f,奥行軸なし,個体識別n,関数>,合成用保存* r,g, ,n,* // 縦軸r,横軸g,奥行軸なし,個体識別n,合成用保存* // 合成 ■図３ 【スカイライン図】 ........ $3 // ３次元図　扇形バブル散布図（バブルサイズは分子に比例） y,e, ,n=y,^,* // 縦軸y,横軸e,奥行軸なし,個体識別n=バブルy,関数^,合成用保存* o,o, ,n,* // 縦軸o,横軸o,奥行軸なし,個体識別n,合成用保存*【原点】 // 合成 ■図６ 【扇形バブル散布図】 ======================= $$ // 終了セクション