No, that's basically the solution I had already come up with (see the
last line of code from my original post)
but, Yes, I'm thinking this might be the simplest way (even though it
might not scale well to millions of elements )
On Dec 31, 1:17 pm, Dennis Murphy wrote:
> Hi,
>
> Is this what you
Hi,
Is this what you wanted?
untable <- function(tab) rep(names(tab), as.vector(tab))
lapply(my.table.list, untable)
$x
[1] "a" "a" "b" "b" "c"
$y
[1] "a" "a" "b" "c" "d" "d"
$z
[1] "c" "d" "d"
HTH,
Dennis
On Thu, Dec 31, 2009 at 12:37 PM, david.schruth wrote:
> Hello,
>
> I'm trying to co
Hello,
I'm trying to construct an overall summary table from a list of
tables.
my.list <- list(x=c('a','b','a','b','c'), y=c
('a','d','c','a','b','d'),z=c('d','d','c'))
my.table.list <- lapply(my.list, table)
normally this might be really easy:
master.table <- table(unlist(my.list))
But as it
3 matches
Mail list logo
