The order function [🇷 for BE/BA]

posted by Helmut Homepage – Vienna, Austria, 2024-03-24 22:12 (198 d 10:20 ago) – Posting: # 23920
Views: 5,085

Hi ElMaestro,

❝ Man, I never looked at the rank function until now. But it seems to be the important distinction between rank and order that answers my question.


Yep. Don’t know what you want to achieve, but:

L            <- c(0.000000, 5161.096198, 18218.849691, 24977.065020,
                  108495.506990, 114018.413824,  459809.038038, 8691576.342850,
                  9917785.333365, 6694756.609860)
df           <- data.frame(L = L, rk = rank(L))
names(df)[2] <- "rank(L)" # cosmetics

print(df)
             L rank(L)
1        0.000       1
2     5161.096       2
3    18218.850       3
4    24977.065       4
5   108495.507       5
6   114018.414       6
7   459809.038       7
8  8691576.343       9
9  9917785.333      10
10 6694756.610       8


print(df[with(df, order(L)), ])
             L rank(L)
1        0.000       1
2     5161.096       2
3    18218.850       3
4    24977.065       4
5   108495.507       5
6   114018.414       6
7   459809.038       7
10 6694756.610       8
8  8691576.343       9
9  9917785.333      10


print(df[with(df, order(rank(L))), ]) # same
             L rank(L)
1        0.000       1
2     5161.096       2
3    18218.850       3
4    24977.065       4
5   108495.507       5
6   114018.414       6
7   459809.038       7
10 6694756.610       8
8  8691576.343       9
9  9917785.333      10


If you simply want to order the L vector, use:

L <- L[order(L)]


Dif-tor heh smusma 🖖🏼 Довге життя Україна! [image]
Helmut Schütz
[image]

The quality of responses received is directly proportional to the quality of the question asked. 🚮
Science Quotes

Complete thread:

UA Flag
Activity
 Admin contact
23,249 posts in 4,885 threads, 1,653 registered users;
74 visitors (0 registered, 74 guests [including 7 identified bots]).
Forum time: 09:32 CEST (Europe/Vienna)

I have never in my life learned anything
from any man who agreed with me.    Dudley Field Malone

The Bioequivalence and Bioavailability Forum is hosted by
BEBAC Ing. Helmut Schütz
HTML5