So, I have been learning R, mostly through datacamp.

number <- 2500
if (number < 11) {
  if (number < 6) {
    result <- "extra small"
  } else {
    result <- "small"
  }
} else if (number < 100) {
  result <- "medium"
} else {
  result <- "large"
}
print(result)