Update rotsf-funs.r