==== skylineRATIO10-per-capita-2age-20-70over-sales-methods-5region-2014part ======== ==== 【2014年度（2015.01.14現在）】の20歳代と70歳以上の販売購入形態の ==== 人口調整相談件数対全国比の５地域の合成スカイライン図・バブル散布図 =================================================================================== $$u // ユーザデータ・セクション $c // クロスセクションデータ属性コマンド 0001.00,0009.00,ttt // ケース始点,終点番号 ,★第１系列名 東北南部人口調整相談件数・20歳代 ,uuu // 空白で同一ケース範囲,★第２系列名 南関東人口調整相談件数・20歳代 ,vvv // 空白で同一ケース範囲,★第３系列名　東海人口調整相談件数・20歳代 ,www // 空白で同一ケース範囲,★第４系列名　近畿人口調整相談件数・20歳代 ,xxx // 空白で同一ケース範囲,★第５系列名　九州北部人口調整相談件数・20歳代 ,yyy // 空白で同一ケース範囲,★第６系列名　全国人口調整相談件数・20歳代 $d // データ入力指示コマンド ctype // ケース毎に読むタイプ ------- ユーザ自身が文字・数値データを ------- テキストファイルまたはExcelシートからコピー＆ペーストする． ------- ユーザデータの各行の末尾にも「//」を挿入してコメント文を記述できる． ------- ★ユーザ文字・数値データ【20歳代】をこの行直後にペーストする ★↓↓★ 122.14 164.10 115.56 144.52 202.59 145.86 18.30 43.90 27.17 24.67 44.73 32.19 192.01 199.69 176.47 190.33 210.54 191.31 13.38 25.31 17.09 21.57 20.98 19.77 10.56 8.01 12.42 12.03 13.40 11.68 1.23 0.33 0.55 0.44 0.37 0.48 1.06 1.12 1.11 0.57 0.55 0.85 2.29 3.53 5.59 4.42 3.23 3.70 44.00 39.98 31.66 35.85 45.93 39.31 $c // クロスセクションデータ属性コマンド 0001.00,0009.00,TTT // ケース始点,終点番号 ,★第７系列名 東北南部人口調整相談件数・70歳以上 ,UUU // 空白で同一ケース範囲,★第８系列名 南関東人口調整相談件数・70歳以上 ,VVV // 空白で同一ケース範囲,★第９系列名　東海人口調整相談件数・70歳以上 ,WWW // 空白で同一ケース範囲,★第10系列名　近畿人口調整相談件数・70歳以上 ,XXX // 空白で同一ケース範囲,★第11系列名　九州北部人口調整相談件数・70歳以上 ,YYY // 空白で同一ケース範囲,★第12系列名　全国人口調整相談件数・70歳以上 $d // データ入力指示コマンド ctype // ケース毎に読むタイプ ------- ユーザ自身が文字・数値データを ------- テキストファイルまたはExcelシートからコピー＆ペーストする． ------- ユーザデータの各行の末尾にも「//」を挿入してコメント文を記述できる． ------- ★ユーザ文字・数値データ【70歳以上】をこの行直後にペーストする ★↓↓★ 98.36 180.38 95.36 148.90 167.51 136.51 66.68 139.09 96.59 131.10 158.02 117.80 72.35 154.89 96.85 132.64 118.04 114.93 6.65 5.24 7.30 4.37 8.09 6.26 89.85 118.00 105.38 135.96 186.50 138.04 5.57 2.83 4.20 4.98 3.56 4.33 12.81 15.72 9.04 14.69 13.70 12.84 3.13 7.21 4.80 8.72 8.52 6.46 110.87 156.28 103.60 116.75 154.62 136.03 ====================== $$v // 変量分析セクション $a // 変量記号の割り当て t,ttt // 　東北南部人口調整相談件数・20歳代 u,uuu // 　南関東人口調整相談件数・20歳代 v,vvv // 　東海人口調整相談件数・20歳代 w,www // 　近畿人口調整相談件数・20歳代 x,xxx // 　九州北部人口調整相談件数・20歳代 y,yyy // 　全国人口調整相談件数・20歳代 T,TTT // 　東北南部人口調整相談件数・70歳以上 U,UUU // 　南関東人口調整相談件数・70歳以上 V,VVV // 　東海人口調整相談件数・70歳以上 W,WWW // 　近畿人口調整相談件数・70歳以上 X,XXX // 　九州北部人口調整相談件数・70歳以上 Y,YYY // 　全国人口調整相談件数・70歳以上 ---------------- $d // 表示範囲 all // 全範囲 ---------------- $t // 変数変換 j=(t/y*100) // 東北南部の人口調整相談件数対全国比・20歳代　％ k=(u/y*100) // 南関東の人口調整相談件数対全国比・20歳代　％ l=(v/y*100) // 東海の人口調整相談件数対全国比・20歳代　％ m=(w/y*100) // 近畿の人口調整相談件数対全国比・20歳代　％ n=(x/y*100) // 九州北部の人口調整相談件数対全国比・20歳代　％ J=(T/Y*100) // 東北南部の人口調整相談件数対全国比・70歳以上　％ K=(U/Y*100) // 南関東の人口調整相談件数対全国比・70歳以上　％ L=(V/Y*100) // 東海の人口調整相談件数対全国比・70歳以上　％ M=(W/Y*100) // 近畿の人口調整相談件数対全国比・70歳以上　％ N=(X/Y*100) // 九州北部の人口調整相談件数対全国比・70歳以上　％ ................... p=:ci(u) // 個体識別文字列p作成 =pr*(t,u,v,w,x,y,T,U,V,W,X,Y,j,k,l,m,n,J,K,L,M,N,p) // 数値プリント .................... i=@.a(Y) //　全国人口調整相談件数Yの項目別の平均値@.aのスカラーi（区切りに利用） I=:ci(i)* //　スカラーiに文字 "*" の文字列変量I　作成（スカイライン区切りに利用） ........ //　全国人口調整相談件数の連結 年齢層の区切りには 4倍のスカラーi 4*i D=(y,i,y,i,y,i,y,i,y,4*i,Y,i,Y,i,Y,i,Y,i,Y) //　[20歳代各地域分+途中のスカラーi]+[70歳以上各地域分+途中のスカラーi] の連結変量D A=(j,0,k,0,l,0,m,0,n,0,J,0,K,0,L,0,M,0,N) //　対全国比 [20歳代各地域分+途中の数値0]+[70歳以上各地域分+途中の数値0] の連結変量A P=(p,I,p,I,p,I,p,I,p,I,p,I,p,I,p,I,p,I,p) //　文字列変量 [20歳代各地域分+途中の文字列I]+[70歳以上各地域分+途中の文字列I] の連結変量P q=cum(D) // 分母変量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> .................... h=(100) // h 対全国比 100％　　 .=(0,h) // スカイライン図上の対全国比 100％の横線 y=0*x+h の右辺係数の関数「.」 +=(h/100,0) // 扇形散布図上の対全国比( h％ / 100)斜線 y=(h/100)*x+0 の右辺係数の関数「+」 z=(0*u) // すべてゼロの数値の変量zを作成（扇形散布図の原点に利用） ........... C=:ci(u)ABCDEFGHIJKLMNOPQRSTUVWXYZ //　英大文字［A,B,C,…Z］の文字列変量C 作成（扇形バブル散布図の散布点識別に利用） ?t=(t,u) // 東北南部人口調整相談件数・20歳代tと南関東人口調整相談件数・20歳代uの連結変量?u ?v=(z,v) // すべてゼロの変量zと東海人口調整相談件数・20歳代vの連結変量?v ?w=(w,x) // 近畿人口調整相談件数・20歳代wと九州北部人口調整相談件数・20歳代xの連結変量?w ?y=(y,y) // 全国人口調整相談件数・20歳代yの２つ分の連結変量?y ?z=(z,y) // すべてゼロの変量zと全国人口調整相談件数・20歳代yの連結変量?z ?T=(T,U) // 東北南部人口調整相談件数・70歳以上Tと南関東人口調整相談件数・70歳以上Uの連結変量?U ?V=(z,V) // すべてゼロの変量zと東海人口調整相談件数・70歳以上Vの連結変量?V ?W=(W,X) // 近畿人口調整相談件数・70歳以上Wと九州北部人口調整相談件数・70歳以上Xの連結変量?W ?Y=(Y,Y) // 全国人口調整相談件数・70歳以上Yの２つ分の連結変量?Y ?Z=(z,Y) // すべてゼロの変量zと全国人口調整相談件数・70歳以上Yの連結変量?Z ?p=(p,C) // 個体識別文字列pと英大文字[ A,B,C,…Z]の文字列変量Cの連結文字列変量?p ---------------- $r // 回帰分析 ,run,t=(y) // tを被説明（従属）変数とし，yを説明（独立）変数とする回帰 ,run,u=(y) // uを被説明（従属）変数とし，yを説明（独立）変数とする回帰 ,run,v=(y) // vを被説明（従属）変数とし，yを説明（独立）変数とする回帰 ,run,w=(y) // wを被説明（従属）変数とし，yを説明（独立）変数とする回帰 ,run,x=(y) // xを被説明（従属）変数とし，yを説明（独立）変数とする回帰 ,run,T=(Y) // Tを被説明（従属）変数とし，Yを説明（独立）変数とする回帰 ,run,U=(Y) // Uを被説明（従属）変数とし，Yを説明（独立）変数とする回帰 ,run,V=(Y) // Vを被説明（従属）変数とし，Yを説明（独立）変数とする回帰 ,run,W=(Y) // Wを被説明（従属）変数とし，Yを説明（独立）変数とする回帰 ,run,X=(Y) // Xを被説明（従属）変数とし，Yを説明（独立）変数とする回帰 =============== $$g // グラフセクション $d // 表示範囲 all // 全範囲 $g // スケールの目盛り指示コマンド（標準10ポイント） A,001 // 変量Aの目盛りを細かく1ポイントごとに ?v,001 // 変量?vの目盛りを細かく1ポイントごとに $z // ゼロ軸表示 A?v?y // 変量A,?v,?yのゼロ軸表示 ---------------------------------- $3 // ３次元図　スカイライン図【人口調整相談件数対全国比】分母：全国人口調整相談件数 A,q, ,P,.,* // 縦軸A,横軸q,奥行軸なし,個体識別P,関数.,合成用保存* A,r, ,P,* // 縦軸A,横軸r,奥行軸なし,個体識別P,合成用保存* // 合成 ■図3 【スカイライン図】（リンク面描画，３次元図圧縮） ........ $3 // ３次元図　扇形バブル散布図【人口調整相談件数：（横軸）全国／（縦軸）地域】 ?t,?y, ,?p=?t,+,* // 縦軸?u,横軸?y,奥行軸なし,個体識別?p=バブル?t,関数+,合成用保存* 【20歳代東北北部・南関東人口調整相談件数】 ?v,?z, ,?p=?v,* // 縦軸?v,横軸?z,奥行軸なし,個体識別?p=バブル?v,合成用保存* 【原点・20歳代東海人口調整相談件数】 ?w,?y, ,?p=?w,+,* // 縦軸?w,横軸?y,奥行軸なし,個体識別?p=バブル?w,関数+,合成用保存* 【20歳代近畿・九州北部人口調整相談件数】 ?T,?Y, ,?p=?T,+,* // 縦軸?T,横軸?Y,奥行軸なし,個体識別?p=バブル?T,関数+,合成用保存* 【70歳以上東北北部・南関東人口調整相談件数】 ?V,?Z, ,?p=?V,* // 縦軸?V,横軸?Z,奥行軸なし,個体識別?p=バブル?V,合成用保存* 【原点・70歳以上東海人口調整相談件数】 ?W,?Y, ,?p=?W,+,* // 縦軸?W,横軸?Y,奥行軸なし,個体識別?p=バブル?W,関数+,合成用保存* 【70歳以上近畿・九州北部人口調整相談件数】 // 合成 ■図10 【扇形バブル散布図】 ======================= $$ // 終了セクション