Comment trouver le plus grand de N éléments dans une liste R?

J'ai une liste de flotte dans R. Pour un entier, N, je veux trouver la indices de la plus grande N des valeurs dans ma liste. Ainsi, par exemple, si N est 2, je veux trouver les indices des deux plus grandes valeurs dans ma liste. Comment dois-je faire?

Je ne peut pas réorganiser ma liste. C'est pourquoi j'ai besoin d'indices.

OriginalL'auteur user2560984 | 2013-07-12

  1. 19
    order(R, decreasing=TRUE)[1:N]
    désolé je n'ai pas préciser, veuillez jeter un oeil à mon edit
    Aucune réponse nécessite la réorganisation de vos données.
    oui mais ils ne font pas de retour à la indicies, ils ont juste de retour de la valeur réelle...

    OriginalL'auteur Hong Ooi

  2. 4

    Voici une alternative:

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

    OriginalL'auteur QuantIbex

  3. 2

    Toutes les autres réponses nécessitent un appel à order qui va s'exécuter en O(M log M) temps. Si N est beaucoup plus petit que le nombre total d'éléments de M, un moyen plus rapide est partiellement trier la liste et puis d'extraire les indices supérieure ou égale à la N-ième plus grande. Cela a O(M + N log N) temps d'exécution et sera beaucoup plus rapide pour les gros 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]

    Noter que ce ne traitera pas avec les liens dans la liste. Il n'y a plus de discussion ici.

    Il est idiomatiques pour stocker des données numériques dans un vecteur et non une liste. D'où l'appel à unlist ci-dessus.

    Comme une fonction, ce qui peut être mis en œuvre comme suit:

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

    OriginalL'auteur John

  4. 1

    Tu veux sans doute dire le vecteur et non une liste, et voici un exemple:

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

    Re commentaire:

    order(-v)[1:3]
#[1] 5 2 3
    désolé je n'ai pas préciser, veuillez jeter un oeil à mon edit

    OriginalL'auteur eddi