枚举值比较

# Members with values: a named integer vector
size <- c(xs = 0L, s = 1L, m = 2L,
          l = 3L, xl = 4L)

small <- size["s"]
large <- size["l"]

is_larger <- large > small
# is_larger = TRUE

cat("is_larger =", is_larger, "\n")