R/isOutput.R

WriteFunctionNames = c("save", "cat", "write", "write.csv")

setGeneric("makesOutput",
            function(x, ...)
               standardGeneric("makesOutput"))

setMethod("makesPlot", "ScriptNodeInfo",
            function(x, ...)
                any(WriteFunctionNames %in% x@functions))

Try the CodeDepends package in your browser

Any scripts or data that you put into this service are public.

CodeDepends documentation built on May 29, 2024, 11:51 a.m.