Is there a pretty-printer for R data (and code for that matter), similar to
Lisp's prettyprint/grind? I've looked in CRAN, and couldn't find anything.

For example, I'd like to have:

prettyprint(list(a=1:20*2, b=list(data.frame(q = c(2,1,3),
  r = c(3,1,2), s = c(1,3,2)), as.POSIXct("2014-02-03")))

*      =>*

list(a = c(2, 4, 6, 8, 10, 12, 14, 16, 18, 20, 22,
           24, 26, 28, 30, 32, 34, 36, 38, 40),
     b = list(data.frame(q = c(2, 1, 3),
                         r = c(3, 1, 2),
                         s = c(1, 3, 2))
              as.POSIXct("2014-02-03")))

That is, something like dput, but with operators, structural indentation,
and line breaks chosen intelligently. (Whether to use as.POSIXct or
structure(...) etc. presumably could be under control of parameters.)

             -s

	[[alternative HTML version deleted]]

