# read/write to directory
outfile <- tempfile(fileext = ".mudata")
write_mudata(kentvillegreenwood, outfile)
md <- read_mudata(outfile)
unlink(outfile)
# read/write to JSON
outfile <- tempfile(fileext = ".json")
write_mudata(kentvillegreenwood, outfile)
md <- read_mudata(outfile)
unlink(outfile)
Run the code above in your browser using DataLab