How to do arcsine transformation in r