more R fiddling