Decompile Progress .r | File

dput(data, file="reconstructed.R")

file yourfile.r or inside R:

load("yourfile.r") # loads object(s) into environment # or data <- readRDS("yourfile.r") Then inspect structure: decompile progress .r file

(if it contains a function)

dput(getAnywhere("function_name")) or for entire loaded object: dput(data, file="reconstructed

readLines("yourfile.r", n = 5) # if text, you'll see code Use: n = 5) # if text