added RM to R output