Update likert.R