On Jul 1, 2011, at 4:50 PM, David Winsemius wrote:

> 
> I would like to do some operations inside a function using only one value for 
> the last dimension of a table/matrix:
> 
> tabfn <- function (dfrm, facvec, YN ="event"){
>             return( Etbl <- do.call(table, dfrm[ , c(facvec, "event") ]) )
>              # just want Etbl[,,,"TRUE"] or Etbl[,, "TRUE"] or Etbl[,"TRUE"]
>              }
> tbl <- tabfn(testdf, c("x", "y") )
> tbl   # all value of event returned
> 
> At the console it is easy for me to count the number of factors and use the 
> right number of commas
> 
> tbl[ , , "TRUE"] if I only want the slice with that value. How can I do this 
> programmatically?
> 
> Thnks.


David,

I had a vague recollection of something like this coming up at some point in 
the past and it took me a bit to get the right keywords to find it. 

I did not realize how far back it was (2001), but here are two possible 
solutions by Peter Dalgaard and Thomas Lumley from the same thread:

https://stat.ethz.ch/pipermail/r-help/2001-October/016110.html
https://stat.ethz.ch/pipermail/r-help/2001-October/016122.html

It looks like Peter's solution is along the lines of the one that you just 
posted.

Hope that this helps.

Regards,

Marc Schwartz

______________________________________________
R-help@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.

Reply via email to