2008年08月04日
課題2 時系列データ

実効為替レート(実質)
Call:
arima(x = ty1, order = c(2, 1, 2), seasonal = list(order = c(1, 1, 1), period = 12))
Coefficients:
ar1 ar2 ma1 ma2 sar1 sma1
0.0320 0.1308 0.2835 -0.1356 0.0574 -1.0000
s.e. 0.5308 0.1277 0.5293 0.2054 0.0481 0.0296
sigma^2 estimated as 6.738: log likelihood = -1086.68, aic = 2187.36
Posted by e051108 at
13:29
│Comments(0)
2008年07月28日
課題1 横断面データ
採用した変数群
id 人口・世帯
x1 総 人 口
x2 男 子 人 口
x3 女 子 人 口
x4 外国人人口
x5 人 口 割 合
x6 人 口 密 度
x7 人 口 密 度
x8 昼夜間人口比率
x9 人口集中地区人口比率
x10 年少人口割合
x11 老年人口割合
結果

n= 47
node), split, n, deviance, yval
* denotes terminal node
1) root 47 15335910.0 934.8404
2) x11>=22.1 26 3382281.0 600.0654
4) x7< 652.4 12 423363.7 433.7917 *
5) x7>=652.4 14 2342786.0 742.5857 *
3) x11< 22.1 21 5431965.0 1349.3240
6) x7< 1934.7 14 3489827.0 1183.9000 *
7) x7>=1934.7 7 792807.0 1680.1710 *
x4:外国人人口を目的変数とし、地域における外国人の割合を調べた。
結果をみるとx11:「老年人口割合」が22.1%で2つのグループに分かれ、これよりさらに「人口密度」で二つのグループに分けられる。低い群では、可住地面積1k㎡当たり1935人より少ない県が14県で外国人人数の平均が1184人、多い県が7件で平均が1680人となっている。
老齢人口が22.1%以上の郡では、可住地面積1k㎡当たり652人より少ない県が12県で平均が433.8人、多い県で14県で平均が742.6人となっている。
以上のことから外国人は、老人が少なく密集した地域に多く住んでいることがわかった。
id 人口・世帯
x1 総 人 口
x2 男 子 人 口
x3 女 子 人 口
x4 外国人人口
x5 人 口 割 合
x6 人 口 密 度
x7 人 口 密 度
x8 昼夜間人口比率
x9 人口集中地区人口比率
x10 年少人口割合
x11 老年人口割合
結果

n= 47
node), split, n, deviance, yval
* denotes terminal node
1) root 47 15335910.0 934.8404
2) x11>=22.1 26 3382281.0 600.0654
4) x7< 652.4 12 423363.7 433.7917 *
5) x7>=652.4 14 2342786.0 742.5857 *
3) x11< 22.1 21 5431965.0 1349.3240
6) x7< 1934.7 14 3489827.0 1183.9000 *
7) x7>=1934.7 7 792807.0 1680.1710 *
x4:外国人人口を目的変数とし、地域における外国人の割合を調べた。
結果をみるとx11:「老年人口割合」が22.1%で2つのグループに分かれ、これよりさらに「人口密度」で二つのグループに分けられる。低い群では、可住地面積1k㎡当たり1935人より少ない県が14県で外国人人数の平均が1184人、多い県が7件で平均が1680人となっている。
老齢人口が22.1%以上の郡では、可住地面積1k㎡当たり652人より少ない県が12県で平均が433.8人、多い県で14県で平均が742.6人となっている。
以上のことから外国人は、老人が少なく密集した地域に多く住んでいることがわかった。
Posted by e051108 at
14:20
│Comments(0)
2008年07月14日
2008年07月07日
2008年06月30日
2008年06月16日
2008年06月09日
2008年05月26日
2008年05月19日
2008年05月12日
課題
> summary(result)
Call:
lm(formula = log(y) ~ log(x))
Residuals:
Min 1Q Median 3Q Max
-0.9419 -0.3653 -0.1499 0.2259 1.8885
Coefficients:
Estimate Std. Error t value Pr(>|t|)
(Intercept) 1.91183 0.06056 31.57 <2e-16 ***
log(x) 0.87266 0.06432 13.57 <2e-16 ***
---
Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
Residual standard error: 0.5272 on 96 degrees of freedom
(2 observations deleted due to missingness)
Multiple R-Squared: 0.6572, Adjusted R-squared: 0.6537
F-statistic: 184.1 on 1 and 96 DF, p-value: < 2.2e-16

Call:
lm(formula = log(y) ~ log(x))
Residuals:
Min 1Q Median 3Q Max
-0.9419 -0.3653 -0.1499 0.2259 1.8885
Coefficients:
Estimate Std. Error t value Pr(>|t|)
(Intercept) 1.91183 0.06056 31.57 <2e-16 ***
log(x) 0.87266 0.06432 13.57 <2e-16 ***
---
Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
Residual standard error: 0.5272 on 96 degrees of freedom
(2 observations deleted due to missingness)
Multiple R-Squared: 0.6572, Adjusted R-squared: 0.6537
F-statistic: 184.1 on 1 and 96 DF, p-value: < 2.2e-16


Posted by e051108 at
14:09
│Comments(0)