On Oct 6, 2010, at 8:42 AM, Henrique Dallazuanna wrote:
Yes,
switch('d', b = 1, 'default')
?switch
For numeric arguments, the OP would need to construct a wrapper that
tested for a NULL return.
> switch(2, b = 1, 'default')
[1] "default"
> switch(4, b = 1, 'default')
> is.null(switch(4, b = 1, 'default'))
[1] TRUE
switchnum <- function(EXPR, ...){
+ if (!is.numeric(EXPR)) {switch(EXPR, ...)} else{
+ if (!is.null(switch(EXPR, ...))) {switch(EXPR, ...)}
else{
+ "default"} } }
> switchnum(4, b = 1, 'default')
[1] "default"
The outer test for numericity may be superfluous.
--
David
On Wed, Oct 6, 2010 at 8:43 AM, raje...@cse.iitm.ac.in <
raje...@cse.iitm.ac.in> wrote:
Hi,
Is there a c++ equivalent default case in the switch command?
[[alternative HTML version deleted]]
______________________________________________
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.
