simplified R comparison