best.R passes 2 tests