R Function Multiple Representation