Of course functions can be used inside ifelse. They should return vectors.
Be careful of the effect of recycling:
ifelse(c(F,T,F,T,F,T),1:3,10:20)
[1] 10 2 12 1 14 3
with functions:
> f<- function(x) x/mean(x)
> ifelse(c(F,T,F,T,F,T),sqrt(1:3),f(10:20))
[1] 0.667 1.4142136 0.800 1.0
Grześ wrote:
>
> Hi,
>
> Could you tell me, if it's possible to create ifelse and put function
> inside, for example:
>
> code{
> ifelse ((is.na(vek)), call_fun_1(arguments), call_fun_2(arguments))
>
> call_fun_1 <- function(arguments)
> { sth...
> }
> }
>
Ok, I found answer alone! This is
Hi,
Could you tell me, if it's possible to create ifelse and put function
inside, for example:
code{
ifelse ((is.na(vek)), call_fun_1(arguments), call_fun_2(arguments))
call_fun_1 <- function(arguments)
{ sth...
}
}
--
View this message in context:
http://www.nabble.com/function-inside-ifelse
3 matches
Mail list logo