【PR】
課題2
2008年08月04日
実効為替レート(実質)
70年1月から08年6月
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.0335 0.1304 0.2821 -0.1358 0.0576 -0.9999
s.e. 0.5324 0.1278 0.5309 0.2059 0.0482 0.0296
sigma^2 estimated as 6.753: log likelihood = -1084.78, aic = 2183.56
70年1月から08年6月
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.0335 0.1304 0.2821 -0.1358 0.0576 -0.9999
s.e. 0.5324 0.1278 0.5309 0.2059 0.0482 0.0296
sigma^2 estimated as 6.753: log likelihood = -1084.78, aic = 2183.56

Posted by e061266 at
13:48
│Comments(0)
課題2
2008年08月04日
実効為替レート(実質)
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.0335 0.1304 0.2821 -0.1358 0.0576 -0.9999
s.e. 0.5324 0.1278 0.5309 0.2059 0.0482 0.0296
sigma^2 estimated as 6.753: log likelihood = -1084.78, aic = 2183.56
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.0335 0.1304 0.2821 -0.1358 0.0576 -0.9999
s.e. 0.5324 0.1278 0.5309 0.2059 0.0482 0.0296
sigma^2 estimated as 6.753: log likelihood = -1084.78, aic = 2183.56

Posted by e061266 at
13:47
│Comments(0)
課題1
2008年08月04日
①採用した変数群
d:市町村名
x1:地域差指数総合
x2:地域差指数食料
x3:一人当たり県民所得
x4:県内総生産額対前年増加率
x5:県内総生産対前年増加
x6:財政力指数
x7:携帯電話
x8:パソコン所有数量
x9:第1次産業就業者比率
x10:保育所数
x11:労働災害発生の頻度

n= 47
node), split, n, deviance, yval
* denotes terminal node
1) root 47 931028.00 1807.000
2) x8< 932.5 21 270610.60 1693.857
4) x4< 0.5 13 89657.69 1638.154 *
5) x4>=0.5 8 75067.88 1784.375 *
3) x8>=932.5 26 174460.20 1898.385
6) x8< 996.5 11 56758.00 1843.000 *
7) x8>=996.5 15 59216.00 1939.000 *
結果を見ると、x8パソコン所有数量、932.5で2つのグループに分けれる。少ないグループは、x4県内総生産額対前年増加率0.5で、さらに分けることが出来、少ないグループは、13県で、平均は1638であり、多いグループは、8県で平均は1784であった。
携帯電話の多いグループは、x8パソコン所有数量996.5で分けることが出来る。996.5より少ないグループは、11県で、平均は1843であり、996.5より多いグループは、15県で、平均は1939であった。
d:市町村名
x1:地域差指数総合
x2:地域差指数食料
x3:一人当たり県民所得
x4:県内総生産額対前年増加率
x5:県内総生産対前年増加
x6:財政力指数
x7:携帯電話
x8:パソコン所有数量
x9:第1次産業就業者比率
x10:保育所数
x11:労働災害発生の頻度

n= 47
node), split, n, deviance, yval
* denotes terminal node
1) root 47 931028.00 1807.000
2) x8< 932.5 21 270610.60 1693.857
4) x4< 0.5 13 89657.69 1638.154 *
5) x4>=0.5 8 75067.88 1784.375 *
3) x8>=932.5 26 174460.20 1898.385
6) x8< 996.5 11 56758.00 1843.000 *
7) x8>=996.5 15 59216.00 1939.000 *
結果を見ると、x8パソコン所有数量、932.5で2つのグループに分けれる。少ないグループは、x4県内総生産額対前年増加率0.5で、さらに分けることが出来、少ないグループは、13県で、平均は1638であり、多いグループは、8県で平均は1784であった。
携帯電話の多いグループは、x8パソコン所有数量996.5で分けることが出来る。996.5より少ないグループは、11県で、平均は1843であり、996.5より多いグループは、15県で、平均は1939であった。
Posted by e061266 at
13:38
│Comments(0)
7月14日 課題終了
7月7日 課題終了
7月7日 課題終了
6月30日 課題終了
6月9日 課題終了
課題5月26日
課題5月12日
2008年05月12日
Call:
lm(formula = log(y) ~ log(x))
Residuals:
Min 1Q Median 3Q Max
-0.59077 -0.18813 -0.06021 0.12550 0.80175
Coefficients:
Estimate Std. Error t value Pr(>|t|)
(Intercept) 1.47806 0.05585 26.46 <2e-16 ***
log(x) 1.40233 0.06575 21.33 <2e-16 ***
---
Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
Residual standard error: 0.2927 on 98 degrees of freedom
Multiple R-Squared: 0.8228, Adjusted R-squared: 0.821
F-statistic: 454.9 on 1 and 98 DF, p-value: < 2.2e-16

lm(formula = log(y) ~ log(x))
Residuals:
Min 1Q Median 3Q Max
-0.59077 -0.18813 -0.06021 0.12550 0.80175
Coefficients:
Estimate Std. Error t value Pr(>|t|)
(Intercept) 1.47806 0.05585 26.46 <2e-16 ***
log(x) 1.40233 0.06575 21.33 <2e-16 ***
---
Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
Residual standard error: 0.2927 on 98 degrees of freedom
Multiple R-Squared: 0.8228, Adjusted R-squared: 0.821
F-statistic: 454.9 on 1 and 98 DF, p-value: < 2.2e-16


Posted by e061266 at
16:45
│Comments(0)