Replace `rlang::scoped_options()` with function from withr in `tibble_print()`

[mikemc]

The rlang functions will be deprecated and it is rec'd to use https://withr.r-lib.org/ instead