Ah, that did the trick! I'll use this quite a lot, I expect. Thanks, Arun. --Frank
On Mon, Jun 17, 2013 at 6:19 PM, Arunkumar Srinivasan <[email protected] > wrote: > Dear Frank, > > Thanks for forwarding to the list. I always seem to forget to "reply-all". > Apologies. Managed this time! :) > > Try this on your data: > > as.data.table(do.call("cbind", lapply(DT, function(x) { > if (is.list(x)) { > lapply(x, function(y) as.numeric(format(y, digits=2))) > } else > as.numeric(format(x, digits=2)) > }))) > > > > Arun > > > > _______________________________________________ > datatable-help mailing list > [email protected] > https://lists.r-forge.r-project.org/cgi-bin/mailman/listinfo/datatable-help >
_______________________________________________ datatable-help mailing list [email protected] https://lists.r-forge.r-project.org/cgi-bin/mailman/listinfo/datatable-help
