alternativa al R

Question

mio codice R finisce contenente pletora di affermazioni del tipo:

if (!is.null(aVariable)) { 
    do whatever 
} 

Ma questo tipo di affermazione è difficile da leggere perché contiene due negazioni. Io preferirei qualcosa di simile:!

if (is.defined(aVariable)) { 
     do whatever 
} 

funziona una is.defined tipo che fa il contrario di is.null esistono standard R?

applausi, Yannick

Answer 1

Si può essere meglio lavorare fuori che valore digitare la funzione o il codice di accetta, e chiedendo che:

if (is.integer(aVariable)) 
{ 
    do whatever 
} 

questo può essere un miglioramento rispetto isnull, perché fornisce il controllo del tipo. D'altra parte, potrebbe ridurre la genericità del tuo codice.

In alternativa, basta fare la funzione che si desidera:

is.defined = function(x)!is.null(x) 

Answer 2

Ian mettere questo nel commento, ma penso che sia una buona risposta:

if (exists("aVariable")) 
{ 
    do whatever 
} 

nota che il nome della variabile è citato.

Answer 3

Se è solo una questione di facile lettura, si può sempre definire la propria funzione:

is.not.null <- function(x) ! is.null(x) 

in modo da poter usare tutto lungo il vostro programma.

is.not.null(3) 
is.not.null(NULL) 

Answer 4

Il pacchetto shiny fornisce le funzioni utili validate() e need() per controllare che le variabili sono entrambi disponibili e validi. need() valuta un'espressione. Se l'espressione non è valida, viene restituito un messaggio di errore. Se l'espressione è valida, viene restituito NULL. Si può usare questo per verificare se una variabile è valida. Vedere ?need per ulteriori informazioni.

Suggerisco definisce una funzione come questa:

is.valid <- function(x) { 
    require(shiny) 
    is.null(need(x, message = FALSE)) 
} 

Questa funzione is.valid() sarà tornare FALSE se x è FALSE, NULL, NA, NaN, una stringa vuota "", un vettore atomico vuoto, un vettore contenente solo valori mancanti, un vettore logico contenente solo FALSE o un oggetto della classe try-error. In tutti gli altri casi, restituisce TRUE.

Ciò significa che need() (e is.valid()) copre una gamma molto ampia di casi di errore.Invece di scrivere:

if (!is.null(x) && !is.na(x) && !is.nan(x)) { 
    ... 
} 

si può scrivere semplicemente:

if (is.valid(x)) { 
    ... 
} 

Con l'assegno per la classe try-error, può essere anche utilizzato in combinazione con un blocco try() per catturare silenziosamente errori: (vedi https://csgillespie.github.io/efficientR/programming.html#communicating-with-the-user)

bad = try(1 + "1", silent = TRUE) 
if (is.valid(bad)) { 
    ... 
}