dput | R Documentation |
Writes an ASCII text representation of an R object to a file, the R console, or a connection, or uses one to recreate the object.
dput(x, file = "", control = c("keepNA", "keepInteger", "niceNames", "showAttributes")) dget(file, keep.source = FALSE)
x |
an object. |
file |
either a character string naming a file or a
connection. |
control |
character vector (or |
keep.source |
logical: should the source formatting be retained when parsing functions, if possible? |
dput
opens file
and deparses the object x
into
that file. The object name is not written (unlike dump
).
If x
is a function the associated environment is stripped.
Hence scoping information can be lost.
Deparsing an object is difficult, and not always possible. With the
default control
, dput()
attempts to deparse in a way
that is readable, but for more complex or unusual objects (see
dump
), not likely
to be parsed as identical to the original. Use control = "all"
for the most complete deparsing; use control = NULL
for the
simplest deparsing, not even including attributes.
dput
will warn if fewer characters were written to a file than
expected, which may indicate a full or corrupt file system.
To display saved source rather than deparsing the internal
representation include "useSource"
in control
. R
currently saves source only for function definitions. If you do not
care about source representation (e.g., for a data object), for speed
set options(keep.source = FALSE
) when calling source
.
For dput
, the first argument invisibly.
For dget
, the object created.
This is not a good way to transfer objects between R sessions.
dump
is better, but the functions save
and
saveRDS
are designed to be used for transporting R data,
and will work with R objects that dput
does not handle correctly
as well as being much faster.
To avoid the risk of a source attribute out of sync with the actual function definition, the source attribute of a function will never be written as an attribute.
Becker, R. A., Chambers, J. M. and Wilks, A. R. (1988) The New S Language. Wadsworth & Brooks/Cole.
deparse
, .deparseOpts
,
dump
, write
.
fil <- tempfile() ## Write an ASCII version of the 'base' function mean() to our temp file, .. dput(base::mean, fil) ## ... read it back into 'bar' and confirm it is the same bar <- dget(fil) stopifnot(all.equal(bar, base::mean, check.environment = FALSE)) ## Create a function with comments baz <- function(x) { # Subtract from one 1-x } ## and display it dput(baz) ## and now display the saved source dput(baz, control = "useSource") ## Numeric values: xx <- pi^(1:3) dput(xx) dput(xx, control = "digits17") dput(xx, control = "hexNumeric") dput(xx, fil); dget(fil) - xx # slight rounding on all platforms dput(xx, fil, control = "digits17") dget(fil) - xx # slight rounding on some platforms dput(xx, fil, control = "hexNumeric"); dget(fil) - xx unlink(fil) xn <- setNames(xx, paste0("pi^",1:3)) dput(xn) # nicer, now "niceNames" being part of default 'control' dput(xn, control = "S_compat") # no names ## explicitly asking for output as in R < 3.5.0: dput(xn, control = c("keepNA", "keepInteger", "showAttributes"))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.