我有一組二進制變數（值分別為 0 和 1），我想創建一個雙向計數表來匯總變數對的共現計數（即，它們的值都為 1）。這是一個示例資料集：
mm <- matrix(0, 5, 6)
m <- 2
n <- 2
df <- data.frame(apply(mm, c(1,2), function(x) sample(c(0,1),1)))
colnames(df) <- c("Horror", "Thriller", "Comedy", "Romantic", "Sci.fi", "gender")
最后，我想有一個表來計算恐怖（= 1）和性別（= 1），驚悚（= 1）和性別（= 1），喜劇（= 1）和性別（= 1）的同時發生)、浪漫 (=1) 和性別 (=1)，以及科幻 (=1) 和性別 (=1)。
uj5u.com熱心網友回復：
像這樣的東西？
library(dplyr)
df %>%
mutate(across(-gender, ~ifelse(.==1 & gender ==1, 1, 0), .names = "{col}_gender1" )) %>%
summarise(across(ends_with("gender1"), sum))
Horror_gender1 Thriller_gender1 Comedy_gender1 Romantic_gender1 Sci.fi_gender1
1 1 3 2 1 0
轉載請註明出處，本文鏈接：https://www.uj5u.com/ruanti/364183.html
上一篇：RMarkdown,kable_styling(latex_options="HOLD_position")不起作用
下一篇：如何重命名串列中的一個資料框