[Rd] reverse object creation

Bo Werth bo.werth at gmail.com
Fri Oct 9 11:55:08 CEST 2015

Dear all,

this is my first message to this mailing list - please advise if it is not
the right place for the subject

I've been using R very intensively the last 3-4 years and one of the most
tedious tasks is modification of lookup or conversion tables

So far, I have not found functions that create the commands for creating
objects (vectors, data frames) based on the objects themselves - i.e. to
reverse-engineer them.

Here are my suggestions:

c_rev <- function(x) cat(paste0('c("', gsub(', ', '", "', toString(x)),

df_rev <- function(x) {
    X <- apply(x, 1,
               function(x) {
                          paste0(shQuote(x), collapse = ", "),
    command <- paste0(
            collapse = ",\n"),
    return(cat(command, "\n"))



	[[alternative HTML version deleted]]

More information about the R-devel mailing list