Wie finden Sie die größten N-Elemente in einer Liste in R?

Habe ich eine Liste von floats in R. Für eine gegebene ganze Zahl, N, ich will zu finden, die Indizes der größten N-Werte in meiner Liste. So zum Beispiel, wenn N 2 ist, ich will finden, die Indizes der beiden größten Werte in meiner Liste. Wie mache ich das?

Kann ich nicht neu anordnen, meine Liste. Dies ist, warum ich muss die Indizes.

InformationsquelleAutor user2560984 | 2013-07-12
  1. 19
    order(R, decreasing=TRUE)[1:N]
    • sorry, habe ich nicht klären, schauen Sie bitte auf meinen edit
    • Keine Antworten verlangen, die Neuordnung Ihrer Daten.
    • ja, aber Sie nicht zurückkehren, die Indizes, die Sie einfach nur wieder den tatsächlichen Wert...
    InformationsquelleAutor Hong Ooi
  2. 4

    Hier ist eine alternative:

    N <- 2
v <- c(3,  9, 11,  18,  5)
tail(order(v), N)
# [1] 3 4
    InformationsquelleAutor QuantIbex
  3. 2

    Alle anderen aktuellen Antworten erfordern einen Aufruf order ausgeführt wird, in O(M log M) Zeit. Wenn N ist viel kleiner als die Anzahl der Elemente M, ein schnellerer Weg ist, um teilweise die Liste zu Sortieren und dann zu extrahieren, die Indizes, die größer als oder gleich der N ' te größte. Dies hat O(M + N log N) Laufzeit und werden viel schneller groß M.

    v <- list(1,7,4,3,9,1,2,3,0,1,2)
vec <- unlist(v)
N <- 3
partial <- length(v) - N + 1
Nth <- sort(vec, partial = partial)[partial]
indexes <- which(vec >= Nth)
vec[indexes]

    Hinweis: dies wird nicht mit Bande in der Liste. Es gibt eine längere Diskussion hier.

    Es ist idiomatisch, numerische Daten zu speichern in einen Vektor, der nicht eine Liste. Daher der Aufruf an unlist oben.

    Als eine Funktion, dies kann umgesetzt werden, etwa so:

    maxn <- function(x, n) {
  partial <- length(x) - n + 1
  x[x >= sort(x, partial = partial)[partial]]
}
    InformationsquelleAutor John
  4. 1

    Du meinst wohl Vektor-und nicht eine Liste, und hier ist ein Beispiel:

    v = c(1,7,4,3,9)
v[order(-v)][1:3]
#[1] 9 7 4

    Re Kommentar:

    order(-v)[1:3]
#[1] 5 2 3
    • sorry, habe ich nicht klären, schauen Sie bitte auf meinen edit
    InformationsquelleAutor eddi
Schreibe einen Kommentar