if (FALSE) {
# Input file name
in.f <- system.file("files/sids.dbc", package = "read.dbc")
# Output file name
out.f <- tempfile(fileext = ".dbc")
# The call return logi = TRUE on success
if (dbc2dbf(input.file = in.f, output.file = out.f)) {
print("File decompressed!")
file.remove(out.f)
}
}
Run the code above in your browser using DataLab