R/felReflect.R

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

Defines functions felReflect

Documented in felReflect

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