R emove warning