How To Use Function In R