format: ~R should check a type only if base is not supplied.

(format t "~2r" 1/2) is valid.