Or convert the EXPR to character :

x <- 5
switch(as.character(x), '2' = 3, 'default')

On Wed, Oct 6, 2010 at 9:57 AM, David Winsemius <dwinsemius@comcast.net>wrote:

>
> 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, rajeshj@cse.iitm.ac.in <
>> rajeshj@cse.iitm.ac.in> wrote:
>>
>>
>>> Hi,
>>>
>>> Is there a c++ equivalent default case in the switch command?
>>>      [[alternative HTML version deleted]]
>>>
>>
>
>
>


-- 
Henrique Dallazuanna
Curitiba-Paraná-Brasil
25° 25' 40" S 49° 16' 22" O

	[[alternative HTML version deleted]]

