使用R進行磁盤空間預測

Question

I have 2 vectors 
days = c(1, 2, 3, 4, 5, 6, 7)
pct_used = c(22.3, 22.1, 22.1, 22.1, 55.660198413, 56.001746032, 55.988769841)

fit <- lm(days ~ poly(pct_used,2,raw=TRUE))
prediction <- predict(fit, data.frame(pct_used=85))
days_remain <- (prediction - tail(days,1)) 

pct_used基本上是磁盤空間。 因此，此代碼可以預測何時磁盤空間將達到85。
返回的預測值為325.something，我感覺很奇怪。這是否意味着需要325天才能達到pct_used = 85？
我要去哪里錯了？

Answer 1

試試看這是怎么回事：

plot(pct_used, days)
lines(pct_used, predict(fit

plot(pct_used, days, xlim=c(min(pct_used), 85) ,ylim= c(-50,350))
lines(seq(min(pct_used), 85, length=50), predict(fit, newdata=data.frame( 
                                        pct_used=seq( min(pct_used), 85, length=50))))