R语言输出Home和Marital的二维频数分布表，添加行列百分比和

在R语言中，你可以使用`table()`函数创建一个二维频数分布表，然后结合`prop.table()`函数计算百分比。假设你有一个名为`data.frame`的DataFrame，其中包含"Home"和"Marital"两个变量，可以按照以下步骤操作：

# 假设你的数据集叫做df
home_marital_counts <- table(df$Home, df$Marital)

# 输出原始的二维频数分布表
print(home_marital_counts)

这将显示每个"Home"类别下各"Marital"状态的具体频数。

接着，为了添加百分比，可以在`prop.table()`函数上应用这个计数矩阵：

# 计算百分比并保留小数点后两位
home_marital_percentages <- round(prop.table(home_marital_counts, margin = 1) * 100, 2)

# 添加百分比到原表格的每一行
home_marital_percentages_df <- data.frame(Percent = home_marital_percentages, row.names = names(home_marital_counts))

# 合并原始频率和百分比表
final_table <- cbind(home_marital_counts, home_marital_percentages_df)

# 打印最终结果
print(final_table)

在这个`final_table`中，每一行代表一种"Home"分类，列名包括原始频数和对应的"Marital"状态百分比。