`bzip2` and `xz` don't work

[chainsawriot]

ref #395 #354

tempfile3 <- tempfile(fileext = ".csv.bzip2")
rio::export(iris, tempfile3)
file.exists(tempfile3)
#> [1] FALSE

tempfile3 <- tempfile(fileext = ".csv.tar")
rio::export(iris, tempfile3)
file.exists(tempfile3)
#> [1] TRUE

^{Created on 2024-04-25 with reprex v2.1.0}