r - 如果不是R中的条件？

Question

R中是否有类似“如果不是”的条件？

简单示例（不起作用）：

fun <- function(x)
{
if (!x > 0) {print ("not bigger than zero")}
}

fun(5)

Answer 1

问题在于您如何定义条件。它应该是

    if(!(x > 0)){ 

代替

    if(!x > 0){ 

这是因为!x将输入（数字）转换为逻辑-这将为除零以外的所有值提供TRUE。所以：

> fun <- function(x){
+   if (!(x > 0)) {print ("not bigger than zero")}
+ }
> fun(1)
> fun(0)
[1] "not bigger than zero"
> fun(-1)
[1] "not bigger than zero"