Bir vektörüm var ve en yüksek ve en düşük değerlere geri dönebiliyorum, ancak en üstteki 5 değer nasıl döndürülebilir? Bunun için basit bir tek çözüm var mı?R'deki vektörden en üstteki 5 değer nasıl iade edilir?
> a <- c(1:100)
> tail(sort(a),5)
[1] 96 97 98 99 100
Evet, head(X, 5) burada X düzenlenmiş vektörünüzdür. Kısmi ile
x[order(x)[1:5]]
tail(sort.int(x, partial=length(x) - 4), 5)
kullanarak sort.int (potansiyel olarak) daha hızlı (potansiyel olarak) tam tür yapmayarak olma avantajına sahiptir. Ama gerçekte, uygulamam biraz daha yavaş görünüyor. Belki de bunun nedeni, kısmi! = NULL parametresi ile, hızlı sıralama yerine kabuk sıralaması kullanılır.
> x <- 1:1e6
> system.time(replicate(100, tail(sort.int(x, partial=length(x) - 4), 5)))
user system elapsed
4.782 0.846 5.668
> system.time(replicate(100, tail(sort(x), 5)))
user system elapsed
3.643 0.879 4.854
Bunun yerine x <-runif (1e6) kullanırsanız, fayda göreceksiniz. Geri aldığınız 5 değerin gerçekten de en yüksek 5 olacağını, ancak zorunlu olarak sıralı bir sıralamada olmayacağını unutmayın. – Tommy
ya 'kafası (çeşit: (a, = TRUE), 5 azaltılması) ' – Marek
kuyruk biraz daha hızlı baş ve azalan daha = TRUE > x <- rnorm (50000000) > system.time (kuyruk (çeşit (x), 5)) kullanıcı sistemi) kullanıcı sistem geçen (5) = TRUE azaltılması, baş (bir çeşit (x) 22.64 0.25 22.95 > system.time geçen 23.26 0.20 23.51 – Thierry
@Thierry Bu durumda büyük Bunu daha sonra bir kez çalıştırın ve ortalama zaman ayırın. Çünkü simülasyonlarıma dayanan bir fark olmadığını düşünüyorum (istatistiksel olarak). – Marek