R/floopReflect.R

In spencerm89/hysteresis4: Tools for Modeling Rate-Dependent Hysteretic Processes and Ellipses

Defines functions floopReflect

Documented in floopReflect

floopReflect <- function(x,y,...) {
x2 <- rev(y)
y2 <- rev(x)
return(floop(x=x2,y=y2,...))
}