Если изображение, к которому вы привязали, - это весь ваш фрейм данных, и у вас просто есть счетчики для разных категорий, вы можете выбрать из столбца размера, используя значения в качестве весов.
data <- data.frame(measurement = c("50 or less", "50-75", "75-80"),
count = c(900, 86, 14))
sample(data$measurement, size = 10, replace = TRUE, prob = data$count)
Если у вас есть Во фрейме данных со всеми вашими фактическими числовыми наблюдениями вы можете исключить веса и в большинстве случаев оставить замену равной false (значение по умолчанию).
sample(data$measurement, size = 10)