R/fitted.loopsummary.R

In hysteresis: Tools for Modeling Rate-Dependent Hysteretic Processes and Ellipses

Defines functions fitted.loopsummary

Documented in fitted.loopsummary

fitted.loopsummary <- function(object,...){
  g <- object
  return(data.frame("input"=g$pred.x,"output"=g$pred.y))
}

Try the hysteresis package in your browser