Alphordering Numbers

knitr::opts_chunk$set(
  collapse = TRUE,
  comment = "#>"
)
set.seed(1)
library(magrittr)
poorly_ordered <- expand.grid(98:103, 9:11) %>% 
  apply(1, function(x) paste0("patient", x[1], "-day", x[2], ".png")) %>% 
  sample(size = length(.))

Numbers don't comply with alphabetical order

poorly_ordered is a vector of file names of images of patient samples from different days.

poorly_ordered

How do we get this vector into order? Well, alphabetical order doesn't work:

sort(poorly_ordered)

Patient 100 comes before patient 99. This is because 1 comes before 9 in alphabetical order.

Alphordering numbers

It's possible to alphord the numbers by prefixing them with zeroes:

strex::str_alphord_nums(poorly_ordered)

Having done this, the alphabetical order is the one we want:

sort(strex::str_alphord_nums(poorly_ordered))


Try the strex package in your browser

Any scripts or data that you put into this service are public.

strex documentation built on Nov. 2, 2023, 6:04 p.m.