data <- mtcars
key <- "5bddd0ea4ab48ed5e33b1406180d68158aa255cf3f368bdd4744abc1a7909ead"
iv <- "7D3EF463F4CCD81B11B6EC3230327B2D"
temp_dir <- tempdir()
rcdf::write_parquet(
data = data,
path = file.path(temp_dir, "mtcars.parquet"),
encryption_key = list(aes_key = key, aes_iv = iv)
)
unlink(file.path(temp_dir, "mtcars.parquet"), force = TRUE)
Run the code above in your browser using DataLab