=========== map2-centerkobe-pref-trans-fatty-acids-total-cow ========================= ====== 県庁所在全市のトランス脂肪酸摂取量【計】と【牛由来食品】トランス摂取量の ====== 神戸市から緯度経度乖離の地図状グラフ =============================================================================== $$u // ユーザデータ・セクション $c // クロスセクションデータ属性コマンド 0001.00,0051.00,aaa // ケース始点,終点番号 ,★第１系列名 ,bbb // 空白で同一ケース範囲,★第２系列名 ,ccc // 空白で同一ケース範囲,★第３系列名 ,ddd // 空白で同一ケース範囲,★第４系列名 $d // データ入力指示コマンド ctype // ケース毎に読むタイプ ------- ユーザ自身が文字・数値データを ------- テキストファイルまたはExcelシートからコピー＆ペーストする． ------- ユーザデータの各行の末尾にも「//」を挿入してコメント文を記述できる． ------- ★ユーザ文字・数値データをこの行直後にペーストする ★↓↓★ 43.064 141.347 162.78 45.98 40.824 140.740 164.17 38.25 39.704 141.153 143.72 47.10 38.269 140.872 149.12 44.81 39.719 140.102 152.52 35.93 38.240 140.364 168.62 50.25 37.750 140.468 147.78 37.27 36.342 140.447 159.85 43.14 36.565 139.883 156.94 43.04 36.391 139.060 156.92 40.22 35.857 139.649 168.54 51.27 35.605 140.123 173.47 57.34 35.689 139.692 160.05 52.44 35.448 139.642 176.53 55.26 37.903 139.023 155.10 44.88 36.695 137.211 141.20 45.28 36.595 136.626 152.20 45.25 36.065 136.222 141.48 44.62 35.664 138.568 172.58 44.56 36.651 138.181 186.98 46.16 35.391 136.722 160.18 44.70 34.977 138.383 154.26 44.94 35.180 136.907 157.98 47.27 34.730 136.509 157.21 51.44 35.005 135.869 174.58 53.25 35.021 135.756 187.69 58.19 34.686 135.520 171.01 53.94 34.691 135.183 190.92 58.37 34.685 135.833 191.39 60.67 34.227 135.167 166.42 50.28 35.504 134.238 172.04 50.20 35.472 133.050 173.31 42.63 34.662 133.934 162.49 51.71 34.397 132.460 179.72 56.89 34.186 131.471 169.12 47.34 34.066 134.559 173.35 52.63 34.340 134.043 162.06 53.84 33.842 132.766 176.05 51.13 33.560 133.531 148.66 37.65 33.607 130.418 152.39 48.99 33.249 130.300 151.73 46.80 32.745 129.874 169.22 44.78 32.790 130.742 157.08 47.52 33.238 131.613 166.73 49.92 31.911 131.424 144.44 37.61 31.560 130.558 175.01 42.25 26.212 127.681 147.40 39.63 35.531 139.703 166.13 49.14 34.711 137.726 142.48 42.91 34.573 135.483 176.62 49.65 33.883 130.875 180.38 52.61 ====================== $$v // 変量分析セクション $a // 変量記号の割り当て a,aaa // 緯度 b,bbb // 経度 c,ccc // トランス脂肪酸摂取量【計】 d,ddd // 【牛由来食品】トランス脂肪酸摂取量 ---------------- $d // 表示範囲 all // 全範囲 ---------------- $t // 変数変換 P=:ci(a) // 個体識別文字列P作成 K=@."(a)28. // ★神戸市（順序数28番）の緯度のスカラー抽出 定数数字後の.は必須 L=@."(b)28. // ★神戸市（順序数28番）の経度のスカラー抽出 定数数字後の.は必須 A=abs(a-K) // 各市の緯度の神戸市からの乖離 B=abs(b-L) // 各市の経度の神戸市からの乖離 =pr*(a,b,c,d,A,B,P) // 数値プリント ---------------- $r // 回帰分析 ,run,c=(b,a) // トランス脂肪酸摂取量【計】を経度と緯度で説明する回帰分析結果 ,run,d=(b,a) // 【牛由来食品】トランス脂肪酸摂取量を経度と緯度で説明する回帰分析結果 F,@"*,c=(B,A) // トランス摂取量【計】を神戸市からの経度乖離と緯度乖離で説明する回帰係数ベクトルF G,@"*,d=(B,A) // 【牛由来食品】トランス摂取量を神戸市からの経度乖離と緯度乖離で説明する回帰係数G ,run,c=(B) // トランス脂肪酸摂取量【計】を神戸市からの経度乖離で説明する単回帰結果 ,run,c=(A) // トランス脂肪酸摂取量【計】を神戸市からの緯度乖離で説明する単回帰結果 ,run,d=(B) // 【牛由来食品】トランス脂肪酸摂取量を神戸市からの経度乖離で説明する単回帰結果 ,run,d=(A) // 【牛由来食品】トランス脂肪酸摂取量を神戸市からの緯度乖離で説明する単回帰結果 =============== $$g // グラフセクション ------------ 地図状グラフ　------------------------------------- $c // 散布図　横軸に神戸市からの経度乖離A，または緯度乖離B c,B,*,P // 縦軸c,横軸B（経度乖離）,回帰線描画*,個体識別P トランス【計】 c,A,*,P // 縦軸c,横軸A（緯度乖離）,回帰線描画*,個体識別P トランス【計】 d,B,*,P // 縦軸d,横軸B（経度乖離）,回帰線描画*,個体識別P 【牛由来】トランス d,A,*,P // 縦軸d,横軸A（緯度乖離）,回帰線描画*,個体識別P 【牛由来】トランス $3 // ３次元図　横軸に神戸市からの経度乖離，奥行軸に緯度乖離 c,B,A,P=c,F,* // 縦軸c,横軸B,奥行軸A,個体識別P=バブル変量c,関数F,合成用保存* トランス【計】 d,B,A,P=d,G,* // 縦軸d,横軸B,奥行軸A,個体識別P=バブル変量d,関数G,合成用保存* 【牛由来】トランス // 合成 ======================= $$ // 終了セクション