谁来定义R函数输入中T/F实例的值

下面，我希望函数为任意

long=T

输出

.25

，为任意

long=F

输出

.5

。因此，我希望得到一个向量

.25、.25、.25、.5、.25

，作为

foo（）

输出

我想知道我怎样才能达到我想要的产量

foo <- function(long = c(T, T, T, F, T)){

 r <- if(long)long[long] <- .25 else long[!long] <- .5
 r
 }
 ## Example of use:
foo()

---

fooif/else

需要长度为1的向量，并返回长度为1的逻辑

向量。我们可以使用
ifelse

foo <- function(long = c(T, T, T, F, T)){

   ifelse(long, .25, .5)

  }

foo()

foo