Крестовый стол с нулевым счетом

Question

Может быть, это просто, но я не смог найти решение.Проблема в том, что в кросс-таблице нулевые значения в R .Если все элементы в строке или столбце кросс-таблицы, команда table не показывает эту строку или столбец.Насколько я вижу, есть решение с командой tabulate для случая с одним вектором, но я не могу найти решение для кросс-таблиц.

Простой пример "что я получаю" и "что яхочу "ниже.

a <- c(rep("a", 4), rep("b", 4))
b <- rep("a", 8)

table(letter1 = a, letter2 = b)

# What I get

#        letter2
# letter1 a
#       a 4
#       b 4

# What I want

#        letter2
# letter1 a b
#       a 4 0
#       b 4 0

Answer 1

Вы можете преобразовать b в коэффициент и указать соответствующие уровни.

table(letter1 = a, letter2 = factor(b, levels = unique(a)))
#       letter2
#letter1 a b
#      a 4 0
#      b 4 0