제목 - xlab size in r



tidyr를 사용하여 여러 열을 분산시키는 R (1)

이 샘플 변수를 가져 가라

df <- data.frame(month=rep(1:3,2),
                 student=rep(c("Amy", "Bob"), each=3),
                 A=c(9, 7, 6, 8, 6, 9),
                 B=c(6, 7, 8, 5, 6, 7))

tidyr 에서 tidyr 를 사용하여 이것을 와이드 형식으로 변경할 수 있습니다.

> df[, -4] %>% spread(student, A)
  month Amy Bob
1     1   9   8
2     2   7   6
3     3   6   9

그러나 출력을 다음과 같이 두 가지 값, 예를 들어 AB 모두에 어떻게 분산시킬 수 있습니까?

  month Amy.A Bob.A Amy.B Bob.B
1     1     9     8     6     5
2     2     7     6     7     6
3     3     6     9     8     7

다음은 data.table 을 사용하여 간단하고 매우 효율적인 솔루션입니다.

library(data.table) ## v >= 1.9.6
dcast(setDT(df), month ~ student, value.var = c("A", "B")) 
#    month Amy_A Bob_A Amy_B Bob_B
# 1:     1     9     8     6     5
# 2:     2     7     6     7     6
# 3:     3     6     9     8     7

또는 가능한 tidyr 솔루션

df %>% 
  gather(variable, value, -(month:student)) %>%
  unite(temp, student, variable) %>%
  spread(temp, value)

#   month Amy_A Amy_B Bob_A Bob_B
# 1     1     9     6     8     5
# 2     2     7     7     6     6
# 3     3     6     8     9     7




tidyr