R diff: non-numeric argument to binary operator Fehler

Wir analysieren einer CSV-Datei, die mit einigen Nummern mit dem folgenden Befehl:

tt <- read.table("test2.csv",sep=";",stringsAsFactors=FALSE)

Und es funktioniert. Druckentt[1,] ergibt sich eine schöne Vektor-und sd(tt[1,]) sinnvoll ist.

Wenn wir jedoch versuchen,

diff(tt[1,])

Die Kommando-Zeile gibt die Fehlermeldung:

Error in r[i1] - r[-length(r):-(length(r) - lag + 1L)] :
    non-numeric argument to binary operator error

Warum ist das so? Irgendwelche Ideen?

Der Fehler: non-numeric argument to binary operator error passiert, wenn Sie versuchen, führen Sie eine beliebige arithmetische operation zwischen einem R-Typ numeric und ein R NICHT-numerischer Typ. Zum Beispiel: 0.5 + list(10,20,30)[1] den Fehler erzeugt. Während 0.5 + as.numeric(list(10,20,30)[1]) vermeidet, indem wir beide Seiten numerisch sind, und druckt 10.5.

InformationsquelleAutor Joachim | 2014-08-25

  1. 7

    Ich nehme an, dass in Ihrem tt[1,], dass

    class(tt[1,])
# [1] "data.frame"

    Also, wenn Sie as.numeric Sie sollten in Ordnung sein. Versuchen Sie dies:

    diff(as.numeric(tt[1,]))

    Hier ist ein Beispiel, mit dem wir überprüfen können:

    tt <- data.frame(x = 1, y = 2)
is.vector(tt[1,])
# [1] FALSE
class(tt[1,])
# [1] "data.frame"
diff(tt[1,])
# Error in r[i1] - r[-length(r):-(length(r) - lag + 1L)] : 
#   non-numeric argument to binary operator
as.numeric(tt[1,])
# [1] 1 2
diff(as.numeric(tt[1,]))
# [1] 1

    InformationsquelleAutor Rich Scriven

  2. 0

    Funktioniert das auch:

    for (i1 in 1:length(dat.diff))
{
diffy <- diff(as.numeric(dat.diff[,i1]))
dat.diff[,i1] <- c(diffy, NA)
}

    InformationsquelleAutor Starbucks

Schreibe einen Kommentar