r - unnecessary class