Identity transformation (do nothing)
identity_trans()
Run examples
plot(identity_trans(), xlim = c(-1, 1))