[R] simplify this instruction

[Wacek Kusnierczyk]

Jorge Ivan Velez wrote:
>
>> B=0:12
>> B
>>     
>  [1]  0  1  2  3  4  5  6  7  8  9 10 11 12
>   
>> ifelse(B%in%c(0:9),'A','B')
>>     
>  [1] "A" "A" "A" "A" "A" "A" "A" "A" "A" "A" "B" "B" "B"
>
>   

given the example, the solution would rather be

if (B %in% as.character(0:9)) "A" else "B"

or maybe

if (as.numeric(B) %in% 0:9) "A" else "B"

>
>> On Wed, Nov 19, 2008 at 4:42 PM, CE.KA <ce.kaya75 at yahoo.fr> wrote:
>>
>>     
>>> Hi R users,
>>>
>>> Is there a way to simplify this instruction:
>>> ifelse(B=="0","A",
>>> ifelse(B=="1","A",
>>> ifelse(B=="2","A",
>>> ifelse(B=="3","A",
>>> ifelse(B=="4","A",
>>> ifelse(B=="5","A",
>>> ifelse(B=="6","A",
>>> ifelse(B=="7","A",
>>> ifelse(B=="8","A",
>>> ifelse(B=="9","A","B"))))))))))
>>>
>>> i am looking for something like this:
>>>
>>> ifelse(B=="(0:9)","A","B")
>>>
>>>