=========== skyline-pionet-telemarketing-elderly-ratio ====================== ====== 電話勧誘販売の商品・サービス別の消費相談の高齢者比率の ====== スカイライン図・バブル扇形散布図 =============================================================================== $$u // ユーザデータ・セクション $c // クロスセクションデータ属性コマンド 0001.00,0025.00,ddd // ケース始点,終点番号 ,★第１系列名　相談件数合計 ,xxx // 空白で同一ケース範囲,★第２系列名　高齢者相談件数 $d // データ入力指示コマンド ctype // ケース毎に読むタイプ ------- ユーザ自身が文字・数値データを ------- テキストファイルまたはExcelシートからコピー＆ペーストする． ------- ユーザデータの各行の末尾にも「//」を挿入してコメント文を記述できる． ------- ★ユーザ文字・数値データをこの行直後にペーストする ★↓↓★ 6100 2526 16487 12400 2732 1479 698 304 1144 418 2683 1406 14133 5534 139 25 12481 1793 148 86 126 73 585 115 932 499 265 168 118 67 699 111 40990 27486 20736 6974 601 18 7599 1848 954 577 9147 4625 2813 150 78 47 732 305 ====================== $$v // 変量分析セクション $a // 変量記号の割り当て d,ddd // d 相談件数合計 x,xxx // x 高齢者相談件数 ---------------- $d // 表示範囲 all // 全範囲 ---------------- $t // 変数変換 s=(x)/d*100 // 比率 P=:ci(x) // 個体識別文字列P作成 =pr*(d,x,s,P) // 数値プリント .................... q=cum(d) // 相談件数合計の累和 q<i>=d<1>+d<2>+...+d<i-1>+d<i> r=(q-d) // 直前までの累和 r<i>=d<1>+d<2>+...+d<i-1> =q<i>-d<i> .................... .=(0,50) // ★比率50の線 y=50=0*x+50 の右辺係数 [0,50] の関数「.」 +=(0.5,0) // ★散布図の斜線 y=0.5x+0 の右辺係数 [0.5,0] の関数「+」 z=(0*x) // すべてゼロの数値の変量zを作成（図の原点に利用） =============== $$g // グラフセクション $d // 表示範囲 all // 全範囲 $g // スケールの目盛り指示コマンド（標準10ポイント） s,001 // 変量sの目盛りを細かく1ポイントごとに x,001 $z // ゼロ軸表示 sd // 変量s,dのゼロ軸表示 $p // プロット xd,s // 変量x,dを同一スケールで，変量sを別スケール ------------ 消費生活相談高齢者比率　------------------------------------- $3 // ３次元図　スカイライン図 s,q, ,P,.,* // 縦軸s,横軸q,奥行軸なし,個体識別P,関数.,合成用保存* s,r, ,P,* // 縦軸s,横軸r,奥行軸なし,個体識別P,合成用保存* // 合成 高齢者比率スカイライン図（リンク縦面描画，３次元図圧縮） ........ $3 // ３次元図　扇形散布図 x,d, ,P=x,+,* // 縦軸x,横軸d,奥行軸なし,個体識別P=バブル変量x,関数+,合成用保存* z,z, ,P,* // 縦軸z,横軸z,奥行軸なし,個体識別P,合成用保存*【原点】 // 合成（散布点と原点のリンク直線描画，３次元図圧縮を利用） ======================= $$ // 終了セクション