0

https://dl.dropbox.com/u/53624395/11.csv

これは時系列データであり、対数回帰を実行してy=a+b(log(x1))+c(log(x2)) a、b、cを見つけ、そのようなタイプの関係が存在するかどうかを確認する必要があります。R ツールを使用してこれを行う必要があります。この質問をhttp://stats.stackexchange.comに投稿しましたが、R プログラミングに完全に関連しているため、StackOverflow に投稿する必要があると言って閉じられました。助けてください。

データ：

structure(list(x = c(433.66, 433, 230, 0, 251, 0, 424, 0, 439, 
0, 0, 0, 0, 85.15, 0, 0, 748, 0, 732, 0, 523.76, 0, 780, 0, 778, 
0, 635.64, 0, 600, 0), y = c(9.9, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
0, 0, 0, 0, 0, 0, 9, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0), 
z = c(43504.95, 49380, 50601, 0, 36064, 0, 47081, 0, 43775, 
0, 0, 0, 0, 85.15, 0, 0, 68502, 0, 66397, 0, 47565.35, 0, 
65695, 0, 69111, 0, 53213.86, 0, 118891, 0), x1 = c(1382.18, 
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1306, 0, 0, 
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0), x2 = c(0, 0, 0, 0, 0, 0, 
0, 0, 0, 0, 0, 0, 0, 1473.27, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
0, 0, 0, 0, 0, 0, 0), x3 = c(0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 
2, 3, 2.1, 2, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
0), x4 = c(0L, 0L, 0L, 0L, 0L, 0L, 0L, 0L, 0L, 2L, 1L, 5L, 
43L, 11L, 2L, 0L, 0L, 0L, 0L, 0L, 0L, 0L, 0L, 0L, 0L, 0L, 
0L, 0L, 0L, 0L)), .Names = c("x", "y", "z", "x1", "x2", "x3", 
"x4"), class = "data.frame", row.names = c(NA, -30L))
4

1 に答える 1

2

何を求めているかは不可能です。しかし、あなたは近づくことができます。

これを試して：y = a + b(log(x1 + 1)) + c(log(x2 + 1))

データ フレームに名前を付けるx

x <- read.csv('11.csv')

lm(y ~ 1 + log(x1+1) + log(x2+1), data=x)

## Call:
## lm(formula = y ~ 1 + log(x1 + 1) + log(x2 + 1), data = x)
##
## Coefficients:
## (Intercept)  log(x1 + 1)  log(x2 + 1)  
##  -1.202e-04    1.312e+00    1.648e-05
于 2013-01-12T05:02:02.860 に答える