==== skyline2-pionet-telemarketing-2region-elderly ===================== ==== 電話勧誘販売の商品・サービス別の消費相談高齢者比率の ==== ２地域の合成スカイライン図・合成バブル扇形散布図 ========================================================================== $$u // ユーザデータ・セクション -----------------　近畿（滋賀、京都、大阪、兵庫、奈良、和歌山）分 ---------- $c // クロスセクションデータ属性コマンド 0001.00,0025.00,aaa // ケース始点,終点番号 ,★第１系列名　相談件数合計 ,bbb // 空白で同一ケース範囲,★第２系列名　高齢者相談件数 $d // データ入力指示コマンド ctype // 変量毎に読むタイプ ------- ユーザ自身が文字・数値データを ------- テキストファイルまたはExcelシートからコピー＆ペーストする． ------- ユーザデータの各行の末尾にも「//」を挿入してコメント文を記述できる． ------- ★ユーザ文字・数値データをこの行直後にペーストする ★↓↓★ 833 376 2150 1658 459 235 94 34 150 65 452 204 1828 772 8 3 1809 328 13 7 10 7 87 17 164 82 38 21 54 34 76 16 6352 4561 3458 1188 78 3 1131 283 109 52 1329 645 411 14 13 9 155 58 ---------------------　北陸（富山、石川、福井）分 ------------------------ $c // クロスセクションデータ属性コマンド 0001.00,0025.00,ccc // ケース始点,終点番号 ,★第３系列名　相談件数合計 ,ddd // 空白で同一ケース範囲,★第４系列名　高齢者相談件数 $d // データ入力指示コマンド ctype // 変量毎に読むタイプ ------- ユーザ自身が文字・数値データを ------- テキストファイルまたはExcelシートからコピー＆ペーストする． ------- ユーザデータの各行の末尾にも「//」を挿入してコメント文を記述できる． ------- ★ユーザ文字・数値データをこの行直後にペーストする ★↓↓★ 198 76 572 443 53 28 11 5 35 23 94 62 719 258 6 2 300 34 8 6 1 0 18 1 15 4 3 0 2 0 20 2 1069 743 924 343 4 0 197 54 24 11 502 206 100 4 3 2 25 13 ====================== $$v // 変量分析セクション $a // 変量記号の割り当て a,aaa // 　近畿の相談件数合計 b,bbb // 　 高齢者相談件数 c,ccc // 　北陸の相談件数合計 d,ddd // 高齢者相談件数 ---------------- $d // 表示範囲 all // 全範囲 ---------------- $t // 変数変換 k=(b/a*100) // 近畿の消費相談高齢者比率　％ l=(d/c*100) // 北陸の消費相談高齢者比率　％ .................. P=:ci(a) // 近畿の識別文字列P作成 Q=:ci(c) // 北陸の識別文字列Q作成 =pr*(a,b,c,d,k,l,P,Q) // 数値プリント .................... i=max(a) //　近畿の相談件数合計の最大値maxのスカラーi（区切りに利用） i=(i*0.3) //　 ★スカラーi（区切りに利用）は幅が大きくなるので30%に縮小 I=:ci(i)* //　スカラーiに文字 "*" の文字列変量I　作成（スカイライン区切りに利用） ?Y=(a,i,c) //　相談件数合計　近畿分a＋スカラーi＋北陸分c の連結変量?Y ?K=(k,0,l) //　消費相談高齢者比率 近畿分k＋数値0＋北陸分l の連結変量?K ?P=(P,I,Q) //　文字列変量 近畿分P＋文字列I＋北陸分Q の連結変量?P q=cum(?Y) // 分母変量?Yの累和 q<i>=?Y<1>+?Y<2>+...+?Y<i-1>+?Y<i> r=(q-?Y) // 直前までの累和 r<i>=?Y<1>+?Y<2>+...+?Y<i-1> =q<i>-?Y<i> .................... h=(50) // ★ h 消費相談高齢者比率 50％　　 .=(0,h) // スカイライン図上の消費相談高齢者比率 50％の横線 y=0*x+h の右辺係数の関数「.」 +=(h/100,0) // 散布図の消費相談高齢者比率 h％の斜線 y=(h/100)*x+0 の右辺係数の関数「+」 ............ 最大ケースの変量zを作成 z=csl(a,c) // 変量aと変量cの統合（aの欠測ケースにはcの数値を採用） z=(0*z) // 最大ケースの変量zの全ケースにゼロの数値（扇形散布図の原点に利用） S=:ci(z) // 最大ケースの変量zの識別文字列S作成 =============== $$g // グラフセクション $d // 表示範囲 all // 全範囲 $g // スケールの目盛り指示コマンド（標準10ポイント） ?K,001 // 変量?Kの目盛りを細かく1ポイントごとに b,001 // 変量b の目盛りを細かく1ポイントごとに $z // ゼロ軸表示 ?Kbd // 変量?K,b,dのゼロ軸表示 ---------------------- 消費相談高齢者比率 ------------ $3 // ３次元図　消費相談高齢者比率スカイライン図　　　横幅：相談件数合計 ?K,q, ,?P,.,* // 縦軸?K,横軸q,奥行軸なし,個体識別?P,関数.,合成用保存* ?K,r, ,?P,* // 縦軸?K,横軸r,奥行軸なし,個体識別?P,合成用保存* // 合成 消費相談高齢者比率スカイライン図（リンク面描画，３次元図圧縮） ........ $3 // ３次元図　扇形散布図 縦軸：高齢者相談件数 横軸：相談件数合計 b,a, ,P=b,+,* // 縦軸b,横軸a,奥行軸なし,個体識別P=バブル変量b,関数+,合成用保存* 【近畿】 z,z, ,S,* // 縦軸z,横軸z,奥行軸なし,個体識別S,合成用保存* 【原点】 d,c, ,Q=d,* // 縦軸d,横軸c,奥行軸なし,個体識別Q=バブル変量d,合成用保存* 【北陸】 // 合成（２次元図上の散布点と原点のリンク，３次元図圧縮を利用） ======================= $$ // 終了セクション