Update ssq.R