如何为R中的每一行和每一列创建一个带有小计的表格？

2024-05-22 01:05:08 114

每行和每列的小计实际上称为边际总和。因此，我们可以在我们的表中使用addmargins函数来获取每行和每列的小计。

例如，如果我们有一个名为TABLE的表，那么我们可以使用下面给出的命令添加小计-

TABLE<-addmargins(TABLE,c(1,2),sum)

查看下面给出的示例以了解它是如何工作的。

示例1

以下代码段创建了一个示例数据框-

x1<-rpois(20,1)
y1<-rpois(20,5)
df1<-data.frame(x1,y1)
df1

输出结果

创建以下数据框-

要为每行和每列创建一个包含小计的表格，请将以下代码添加到上面的代码段中-

x1<-rpois(20,1)
y1<-rpois(20,5)
df1<-data.frame(x1,y1)
table1<-table(df1$x1,df1$y1)
table1

输出结果

如果您将上述所有给定的片段作为单个程序执行，它会生成以下输出-

   2  3  4  5  6  7
0  2  1  1  2  1  1
1  1  0  1  2  1  0
2  0  1  2  2  0  0
3  0  0  0  0  2  0

要为每行和每列创建一个包含小计的表格，请将以下代码添加到上面的代码段中-

table1<-addmargins(table1,c(1,2),sum)
Margins computed over dimensions
in the following order:
1:
2:
table1

输出结果

如果您将上述所有给定的片段作为单个程序执行，它会生成以下输出-

    2  3  4  5  6  7  sum
0   2  1  1  2  1  1  8
1   1  0  1  2  1  0  5
2   0  1  2  2  0  0  5
3   0  0  0  0  2  0  2
sum 3  2  4  6  4  1 20

示例2

以下代码段创建了一个示例数据框-

x2<-rpois(20,5)
y2<-rpois(20,5)
df2<-data.frame(x2,y2)
df2

输出结果

创建以下数据框-

要为每行和每列创建一个包含小计的表格，请将以下代码添加到上面的代码段中-

x2<-rpois(20,5)
y2<-rpois(20,5)
df2<-data.frame(x2,y2)
table2<-table(df2$x2,df2$y2)
table2

输出结果

如果您将上述所有给定的片段作为单个程序执行，它会生成以下输出-

   0  3  4  5  6  7 9
1  0  0  0  0  0  1 0
3  0  1  0  0  1  0 0
4  1  2  1  1  1  2 0
5  0  1  1  0  0  0 0
6  0  1  0  0  1  1 0
7  0  0  0  1  1  1 0
8  0  0  0  0  0  0 1

要为每行和每列创建一个包含小计的表格，请将以下代码添加到上面的代码段中-

table2<-addmargins(table2,c(1,2),sum)
Margins computed over dimensions
in the following order:
1:
2:
table2

输出结果

如果您将上述所有给定的片段作为单个程序执行，它会生成以下输出-

    0  3  4  5  6  7  9 sum
1   0  0  0  0  0  1  0  1
3   0  1  0  0  1  0  0  2
4   1  2  1  1  1  2  0  8
5   0  1  1  0  0  0  0  2
6   0  1  0  0  1  1  0  3
7   0  0  0  1  1  1  0  3
8   0  0  0  0  0  0  1  1
sum 1  5  2  2  4  5  1 20

如何为R中的每一行和每一列创建一个带有小计的表格？

示例1

示例2

热门推荐

随机推荐