Changed messages in both functions.
Changed an 'if' test from 'all.equal()'
to 'isTRUE(all.equal())'