cloud <- ichimoku(sample_ohlc_data, ticker = "TKR")
file <- tempfile()
archive(cloud, file)
restored <- archive(file)
unlink(file)
if (interactive()) {
# Only run examples in interactive R sessions
# Read file to 'object' using system dialog:
object <- archive()
# Write 'cloud' to file using system dialog:
archive(cloud, )
}
Run the code above in your browser using DataLab