roxygenize change_lcomp.R