Ausgabe eines Boolean von einem Rscript in eine Bash-Variable

Question

Ich habe ein R-Skript, das TRUE oder FALSE ausgibt. In R, ist es mit einem bona fide T/F-Datentyp, aber wenn ich den Rückgabewert Echo einzuschlagen, so scheint es, eine Zeichenfolge zu sein, zu sagen:

"[1] TRUE"

oder

"[1] FALSE"

Sie sind beide von [1] vorangegangen. Weder ist [0], das ist kein Tippfehler. Wie auch immer, das Ergebnis davon ist, dass, wenn ich versuche, die Ausgabe dieses Rscript zu testen, um ein nachfolgendes Skript auszuführen, ich String-Vergleich zu "[1] TRUE" wie folgt machen muss, anstatt mit "TRUE" oder " 1 "das fühlt sich sauberer und besser an.

A=$(Rscript ~/MyR.r) 
echo $A 
if [ "$A" == "[1] TRUE" ]; then 
    bash SecondScript.sh 
fi 

Wie kann ich R entweder Ausgang ein true Boolean oder Bash die Ausgabezeichenfolge akzeptieren und zu 0/1 zum Vergleich konvertieren? Das heißt, ich würde lieber testen ...

if [ $A == TRUE ]; 

als

if [ "$A" == "[1] TRUE" ]; 

Ist das möglich, oder soll ich mit diesem glücklich sein, wie es ist, das funktioniert?

* UPDATE *

Hier ist die minimalisierte Version des Rscript, die diese erzeugt ...

myinput <- TRUE #or FALSE 

FunctionName <- function(test){ 
if (test == TRUE){ 
val <- TRUE 
} else { 
val <- FALSE 
} 
return(val) 
} 

FunctionName(myinput) 

Answer 1

Statt entweder Druck von() oder die implizite print() - ing, das auftritt, Wenn dem R-Interpreter ein Objektname angeboten wird, sollten Sie cat() verwenden, das nicht vor "TRUE" oder "FALSE" dem "[1]" vorangestellt wird. Wenn Sie 0/1 möchten, verwenden Sie cat(as.numeric(.)). Versuchen Sie stattdessen:

myinput <- TRUE #or FALSE 
FunctionName <- function(test){ 
    if (test == TRUE){ 
       val <- TRUE 
        } else { 
       val <- FALSE 
      } 
    cat(as.numeric(val)) 
} 
FunctionName(myinput) 

Wenn Sie diesen Wert für die weitere Verarbeitung benötigt man auch diese verwenden:

cat(as.numeric(val)); invisible(val) 

Answer 2

Kurz ändern, was Ihr R Skript tut, Sie eine der folgenden auf das tun können Schlag-Seite:

if [[ $A == *TRUE* ]] 

oder

if [[ $A =~ TRUE ]] 

Im zweiten Fall, mit Regex Matching, ist es in der Regel empfohlen, dass das Muster in einer Variablen gesetzt werden:

es ist nicht notwendig,

pattern=TRUE 
if [[ $A =~ $pattern ]] 

aber in offensichtlich einfachen Fällen wie diese.

Answer 3

Sie auch eine Funktion in bash definieren können, die die R-Ausgabe in WAHR/FALSCH konvertiert:

r_to_bash() { 
    echo "$1" | cut -d' ' -f2 
} 

Jetzt können Sie es mögen:

A=$(r_to_bash "$A") 
if [ $A == TRUE ];