get.smart.prediction.RdRetrieves .smart.prediction from
smartpredenv.
get.smart.prediction()Returns with the list .smart.prediction from
smartpredenv.
A smart modelling function such as lm allows
smart functions such as sm.bs
to write to
a data structure called .smart.prediction in
smartpredenv.
At the end of fitting,
get.smart.prediction retrieves this data structure.
It is then attached to the object, and used for prediction later.
if (FALSE) { # \dontrun{
fit$smart <- get.smart.prediction() # Put at the end of lm()
} # }