2016-11-10 51 views
-1

我有一個非常大的數據集。這是一些例子。如何根據兩個規範預測R中的某些內容?

      Car sport SUV Wagon Minivan Pickup AWD RWD MSRP Invoice EngineSize Cylinders HP City.MPG Hwy.MPG Weight 
      Chevrolet Aveo 4dr  0 0  0  0  0 0 0 11690 10965  1.6   4 103  28  34 2370 
Chevrolet Aveo LS 4dr hatch  0 0  0  0  0 0 0 12585 11802  1.6   4 103  28  34 2348 
     Chevrolet Cavalier 2dr  0 0  0  0  0 0 0 14610 13697  2.2   4 140  26  37 2617 
     Chevrolet Cavalier 4dr  0 0  0  0  0 0 0 14810 13884  2.2   4 140  26  37 2676 
    Chevrolet Cavalier LS 2dr  0 0  0  0  0 0 0 16385 15357  2.2   4 140  26  37 2617 
      Dodge Neon SE 4dr  0 0  0  0  0 0 0 13670 12849  2.0   4 132  29  36 2581 

我想要做的是預測3.5升發動機跑車的馬力。我真的不太確定從哪裏開始。我創造了這些模型來尋找跑車的馬力。

sportFilter <- cars$sport==1 
hpModelSport <- lm(cars$HP[sportFilter] ~ cars$EngineSize[sportFilter]) 

而這對於發動機的大小。

hpModel <- lm(HP ~ EngineSize, data = cars) 

但我該如何使用這兩個。而發動機尺寸模型只是一般的,我如何指定3.5升?

+0

當然在這裏你去 https://drive.google.com/file/d/0B5n-r165dW8FWXc1M1ZDcWQ5M0E/ view?usp = sharing –

+1

'm < - lm(HP〜EngineSize,cars,subset = cars $ sport == 1);預測(m,data.frame(EngineSize = 3.5))' – alistaire

回答

1

假設你正在試圖預測基於EngineSizeHPsport你可以做到以下幾點:

cars <- read.table("d:/Downloads/04cars.csv", header =T, sep =",", stringsAsFactors = FALSE) 
fit <- lm(HP ~ EngineSize + sport , data=cars) 
vals <- data.frame(EngineSize = 3.5, sport = 1) 
predict(fit, newdata=vals) 
+0

這正是我所期待的,謝謝! –

相關問題