New specfun.R