R: more tests