R 如何跨列计算频率

如何计算列中的频率

df要执行所有列：

sapply(df, table)

要执行所有列，请执行以下操作：

sapply(df, table)

---

不太清楚你在找什么。这是按工作人员分组的汇总表：

---

如果您想按工厂代码制表，只需相应地用命令替换组中的工人即可

不太确定您要查找的是什么。这是按工作人员分组的汇总表：

---

如果您想按工厂代码进行表格，只需相应地用命令替换组中的工人即可

您还可以使用来自门卫软件包的以下解决方案：

多亏了我亲爱的朋友@Anil Goyal的及时提示，我们可以通过将位数限制为2，同时为每个数字加上%符号，为频率表提供更好的输出

df %>%
  tabyl(Worker, Plant.Code) %>%
  adorn_percentages() %>%
  adorn_pct_formatting(digits = 2, affix_sign = TRUE)

 Worker     11     12      3       4      5       6       7      8      9
      0  0.00%  0.00%  0.00%   0.00% 66.67%   0.00%  33.33%  0.00%  0.00%
      1  0.00%  0.00%  0.00%  28.57% 14.29%  14.29%  14.29% 28.57%  0.00%
      2  0.00%  0.00%  0.00%   0.00% 50.00%   0.00%   0.00%  0.00% 50.00%
      3  0.00%  0.00%  0.00%   0.00%  0.00%   0.00% 100.00%  0.00%  0.00%
      4  0.00%  0.00% 50.00%   0.00%  0.00%   0.00%  50.00%  0.00%  0.00%
      5  0.00% 33.33%  0.00%   0.00%  0.00%   0.00%  33.33% 33.33%  0.00%
      7 33.33%  0.00%  0.00%   0.00% 33.33%   0.00%   0.00% 33.33%  0.00%
      8  0.00%  0.00%  0.00% 100.00%  0.00%   0.00%   0.00%  0.00%  0.00%
     12  0.00%  0.00%  0.00%   0.00%  0.00% 100.00%   0.00%  0.00%  0.00%

---

您还可以使用来自门卫软件包的以下解决方案：

多亏了我亲爱的朋友@Anil Goyal的及时提示，我们可以通过将位数限制为2，同时为每个数字加上%符号，为频率表提供更好的输出

df %>%
  tabyl(Worker, Plant.Code) %>%
  adorn_percentages() %>%
  adorn_pct_formatting(digits = 2, affix_sign = TRUE)

 Worker     11     12      3       4      5       6       7      8      9
      0  0.00%  0.00%  0.00%   0.00% 66.67%   0.00%  33.33%  0.00%  0.00%
      1  0.00%  0.00%  0.00%  28.57% 14.29%  14.29%  14.29% 28.57%  0.00%
      2  0.00%  0.00%  0.00%   0.00% 50.00%   0.00%   0.00%  0.00% 50.00%
      3  0.00%  0.00%  0.00%   0.00%  0.00%   0.00% 100.00%  0.00%  0.00%
      4  0.00%  0.00% 50.00%   0.00%  0.00%   0.00%  50.00%  0.00%  0.00%
      5  0.00% 33.33%  0.00%   0.00%  0.00%   0.00%  33.33% 33.33%  0.00%
      7 33.33%  0.00%  0.00%   0.00% 33.33%   0.00%   0.00% 33.33%  0.00%
      8  0.00%  0.00%  0.00% 100.00%  0.00%   0.00%   0.00%  0.00%  0.00%
     12  0.00%  0.00%  0.00%   0.00%  0.00% 100.00%   0.00%  0.00%  0.00%

试试这个

> as.data.frame(xtabs(~Worker, df))
  Worker Freq
1      0    3
2      1    7
3      2    2
4      3    1
5      4    2
6      5    3
7      7    3
8      8    1
9     12    1

或

试试这个

> as.data.frame(xtabs(~Worker, df))
  Worker Freq
1      0    3
2      1    7
3      2    2
4      3    1
5      4    2
6      5    3
7      7    3
8      8    1
9     12    1

或

也许你可以使用聚合。这将为您提供每个工厂的工人计数。代码

aggregate(Worker ~ Plant.Code + Plant.Code, df, sum)

输出：

  Plant.Code Worker
1          3      4
2          4     10
3          5     10
4          6     13
5          7     13
6          8     14
7          9      2
8         11      7
9         12      5

也许你可以使用聚合。这将为您提供每个工厂的工人计数。代码

aggregate(Worker ~ Plant.Code + Plant.Code, df, sum)

输出：

  Plant.Code Worker
1          3      4
2          4     10
3          5     10
4          6     13
5          7     13
6          8     14
7          9      2
8         11      7
9         12      5

按比例使用堆栈

按比例使用堆栈

---

你试过tabledf$`Plant Code`你试过tabledf$`Plant Code`我怎样才能得到百分比格式？我怎样才能得到百分比格式？你也可以很好地将百分比格式设置为看门人格式。你也可以很好地将百分比格式设置为看门人格式。我刚知道你有一个比例：P，干杯！只是prop.table是一个较早的名称，保留它是为了向后兼容：-伟大的新知识对我来说：我刚知道你有一个比例：P，干杯！只是prop.table是一个较早的名称，保留它是为了向后兼容：-伟大的我的新知识：