[R] table() and setting useNA to be there by default?

[Peter Ehlers]

Sean O'Riordain wrote:
> Good morning,
> 
> Is there a way to get table() to default to including NAs  - as in...
> table(..., useNA='ifany') or  table(..., useNA='always') or table(...,
> exclude=NULL)  ?
> 
> I can't see a way under table() or options() or searching the archives
> (probably using the wrong keyword?).
> 
>> t1 <- c(1,2,3,3,3,2,NA,NA,NA,NA)
>> table(t1)
> t1
> 1 2 3
> 1 2 3
> 
> I keep forgetting to allow for NAs and I was bitten *again* this
> morning... ideally I'd like to be able to set a default in my profile
> so that table(t1) will actually do table(t1, exclude=NULL) or
> table(t1, useNA='ifany')
> 
> I could say something like..
> 
>> tab1 <- function(t, ...) { table(t, ..., useNA='ifany') }
>> tab1(t1)
> 
> t
>    1    2    3 <NA>
>    1    2    3    4
> 
> but this names it as 't' instead of 't1' which is ugly?

How about

tab1 <- function(...) table(..., useNA='ifany')

  -Peter Ehlers

> 
> Any other suggestions please?
> 
> Thanks in advance,
> Sean O'Riordain
> Dublin
> Ireland
> 
> ______________________________________________
> R-help at 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.
> 
> 

-- 
Peter Ehlers
University of Calgary
403.202.3921