Update univariate.r