2017-05-29 7 views

答えて

3

次の形式を使用できます:あなたが好きな場合は、関数内でそのすべてをパックすることができます

# Fit model 
model.lm <- lm(Sepal.Length ~ Petal.Length, data = iris[1:75,]) 

# Predict data for some new data 
pred.dat <- predict(model.lm, newdata = iris[76:150,]) 

# Calculate correlation between predicted values for new data and actual values, then square 
cor(iris[1:75,"Sepal.Length"], pred.dat)^2 

を。助けが必要な場合は、尋ねてください。

乾杯

フェリペ

+0

おかげでたくさんのフェリペ!私は今試してみる、非常に良い! – Stephane

関連する問題