横表变为竖表

library(tidyr)
from=c("O1","O2","O3")
D1=c(7,7,2)
D2=c(3,2,0)
D3=c(9,8,2)
D4=c(3,2,10)
df=data.frame(from,D1,D2,D3,D4)
df %>%
gather(to,flow,-from)

©著作权归作者所有,转载或内容合作请联系作者
平台声明：文章内容（如有图片或视频亦包括在内）由作者上传并发布，文章内容仅代表作者本人观点，简书系信息发布平台，仅提供信息存储服务。