Как нарисовать таблицу относительной частоты

Src=as.factor(c("nc","us","us","nc","nc","ci","nn","pr","nc","nc","ak","ak","ak","ak","ci","hv","ak","ci","nc","nc"))
Version = as.factor(c(0,4,7,0,0,0,9,0,0,0,1,1,1,1,0,2,1,0,0,0))
table(Src,Version)

Вывод:

    Version
Src  0 1 2 4 7 9
  ak 0 5 0 0 0 0
  ci 3 0 0 0 0 0
  hv 0 0 1 0 0 0
  nc 7 0 0 0 0 0
  nn 0 0 0 0 0 1
  pr 1 0 0 0 0 0
  us 0 0 0 1 1 0

Вместо того, чтобы показывать подсчитанные числа, могу ли я вместо этого показывать относительные частоты?

2
nl ja de
Вы имеете в виду как prop.table (table (Src, Version)) ?
добавлено автор A5C1D2H2I1M1N2O1R2T1, источник

3 ответы

Конечно. Вы можете использовать prop.table() для этого:

prop.table(table(Src, Version))

Это создаст таблицу типа:

    Version
Src     0    1    2    4    7    9
  ak 0.00 0.25 0.00 0.00 0.00 0.00
  ci 0.15 0.00 0.00 0.00 0.00 0.00
  hv 0.00 0.00 0.05 0.00 0.00 0.00
  nc 0.35 0.00 0.00 0.00 0.00 0.00
  nn 0.00 0.00 0.00 0.00 0.00 0.05
  pr 0.05 0.00 0.00 0.00 0.00 0.00
  us 0.00 0.00 0.00 0.05 0.05 0.00

Вы можете использовать необязательный аргумент margin для запроса относительных частот строк или столбцов.

8
добавлено

Это действительно FAQ.

Просто разделите таблицу на ее сумму:

tab <- table(Src,Version)
tab/sum(tab)

См. Также ? Prop.table .

3
добавлено

Один из вариантов - использовать barplot с рядом с = TRUE , чтобы показать относительный (график не изменится с разницей пропорций, только масштабов) разницы между группами.

 barplot(table(Src,Version),beside=TRUE)

enter image description here

0
добавлено
@AnandaMahto может быть :) Попытайтесь построить 2, чтобы увидеть разницу. Я действительно не очень-то забавна с prop.table специально в относительном случае. И мой ответ был просто альтернативой вашему первому комментарию, который использовался в качестве ответа другими ...
добавлено автор agstudy, источник
Это довольно буквальная интерпретация «draw»;) Но, я все же думаю, что вам понадобится barplot (prop.table (table ... ), чтобы получить желаемый результат.
добавлено автор A5C1D2H2I1M1N2O1R2T1, источник