을 만들 수가 테이블 아래에서 특정 조건

0

질문

나는 설정의 이진 변수가(의 값으로 0~1)그리고 내가 만들려면 두 가지 방법을 계산하는 테이블이 요약되어 수 cooccurrence 쌍의 변수(즉,모두의 가치 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")

In the end,하고 싶은 테이블을 계산하는 cooccurrence 공포의(=1)및 성(=1),스릴러(=1)및 성(=1),코미디(=1)및 성(=1),낭만주의(=1)및 성(=1)며,sci.터(=1)및 성(=1)입니다.

1

최고의 응답

3

무언가가 이것을 좋아하는가?

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
2021-11-23 19:15:28

감사합니다. 이것은 정확히 무엇을 찾고 있었습니다. I would add t()끝에 그것을 만들 수직
cliu

한 후속 질문입니다. 당신이 알고있는 방법을 또한 다른 추가 열 계산하는 모든 다른 변수 값 1 성별=0? 급적이면서 동의 덩어리 dplyr 코드
cliu

다른 언어로

이 페이지는 다른 언어로되어 있습니다

Русский
..................................................................................................................
Italiano
..................................................................................................................
Polski
..................................................................................................................
Română
..................................................................................................................
हिन्दी
..................................................................................................................
Français
..................................................................................................................
Türk
..................................................................................................................
Česk
..................................................................................................................
Português
..................................................................................................................
ไทย
..................................................................................................................
中文
..................................................................................................................
Español
..................................................................................................................
Slovenský
..................................................................................................................