how to transform percentage data in r