Message-ID: <20220330140112.48e016e0@arachnoid>
Date: 2022-03-30T11:01:12Z
From: Ivan Krylov
Subject: Where is list.names?
In-Reply-To: <d3b34b25-c031-6d5d-6080-b1e3b4e92513@umu.se>
? Wed, 30 Mar 2022 12:43:52 +0200
G?ran Brostr?m <goran.brostrom at umu.se> ?????:
> That works, if I check for missing argument
> Is this the final word?
How about omitting it entirely and letting ... handle it?
table <- function(
..., useNA = "ifany", exclude = if (useNA == "no") c(NA, NaN),
deparse.level = 1
) base::table(
..., useNA = useNA, exclude = exclude, deparse.level = deparse.level
)
table(c(1,1,2,NA))
#
# 1 2 <NA>
# 2 1 1
table(c(1,1,2,NA), dnn = 'a')
# a
# 1 2 <NA>
# 2 1 1
--
Best regards,
Ivan