How to extract a string of variable/object name from R object