jeśli nie warunki w R?

Question

Czy jest coś takiego jak warunki "jeśli nie" w R?

łatwy Przykład (nie działa):

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

fun(5) 

najlepsze życzenia Philipp

Answer 1

Problem polega na tym, w jaki sposób definiowania warunku. Powinno być

if(!(x > 0)){ 

zamiast

if(!x > 0){ 

To dlatego !x przetwarza wejście (liczbowy) do logicznego - co daje TRUE dla wszystkich wartości z wyjątkiem zera. A więc:

> 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" 

Answer 2

Spróbuj:

if(!condition) { do something } 

Answer 3

Jak na ten temat?

fun<-function(x){ ifelse(x>0,"not bigger than zero","zero or less") }

fun(5)

[1] "Bigger than zero"