sinon conditions dans R?

Question

Y at-il quelque chose comme "sinon" conditions dans R?

Exemple (ne fonctionne pas) facile:

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

fun(5) 

Meilleurs voeux Philipp

Answer 1

Le problème est dans la façon dont vous définissez la condition. Il devrait être

if(!(x > 0)){ 

au lieu de

if(!x > 0){ 

C'est parce que !x convertit l'entrée (un numérique) à une logique - qui donnera TRUE pour toutes les valeurs sauf zéro. Donc:

> 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

Essayez:

if(!condition) { do something } 

Answer 3

Comment cela?

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

fun(5)

[1] "Bigger than zero"