changesets.r code is working now