От таблицы частот до аберраций

Question

Я пытаюсь эффективно построить фрейм данных, который может представлять источник таблицы частот в R.

Простой пример:

A <- data.frame(Age=c(20,60,20,60), Health=c("Good","Good","Bad","Bad"), Frequency=c(53,13,23,31))

Что я хотел бы иметь матрицу, которая сгенерировала бы вышеуказанное распределение. Есть ли быстрый способ сделать это?

Answer 1

Как насчет этого подхода?

B <- apply(A,1,function(x){matrix(c(x[1],x[2]),ncol = 2, nrow = as.numeric(x[3]), byrow = TRUE)})
B <- do.call(rbind,B)
colnames(B) <- c("Age","Health")