두 벡터의 천이 행렬을 R

Question

에서 생성했습니다. 프로세스의 천이 빈도를 시각화하려고합니다. 나는 다음과 같은 데이터가>

from to 
1 4 
4 5 
1 3 
1 3 
4 5 
... 

는 내가 뭘하려고 나는 바퀴를 재발견하기 전에

1 3 4 5 
1 0 2 1 0 
3 0 0 0 0 
4 0 0 0 2 
5 0 0 0 0 

이 있으며, 상단 예를 들어, 그래서 그 전환의 주파수 행렬의 히트 맵을 만들고 거기 어떤 결과를 줄 수있는 R의 사전 정의 된 함수?

감사합니다.

Answer 1

이를 시도해보십시오 속는 대상 재

df 

    from to 
1 1 4 
2 4 5 
3 1 3 
4 1 3 
5 4 5 

df$count <- 1 
df <- aggregate(count~from+to, data=df, sum) 
nodes <- unique(c(df$from,df$to)) 
df1 <- merge(expand.grid(from=nodes, to=nodes), df, by=c('from','to'), all=TRUE) 
df1$count[is.na(df1$count)] <- 0 
library(reshape2) 
dcast(df1, from~to, value.var = 'count') 

    from 1 3 4 5 
1 1 0 2 1 0 
2 3 0 0 0 0 
3 4 0 0 0 2 
4 5 0 0 0 0