2016-11-10 6 views
-1

私は非常に大きなデータセットを持っています。ここにそのいくつかの例があります。2つの仕様が与えられた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/ビュー?usp =共有 –

+1

'm < - lm(HP〜EngineSize、cars、サブセット= cars $ sport == 1); predict(m、data.frame(EngineSize = 3.5)) ' – alistaire

答えて

1

あなたは次の操作を行うことができますsportEngineSizeに基づいてHPを予測しようとしていると仮定:

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

これはまさに私が探していたものです。ありがとう! –

関連する問題