How To Take Integer Input From User In R