temp = matrix(1:100, ncol=10) #元データ m = as(temp, "dgTMatrix") #dgTMatrixのクラスに変換 d = data.frame(row=m@i+1, col=m@j+1, val=m@x) #ゼロからカウントされるので1を足す
tibble( id_tdy=rep(1:10 , times = 10), id_tmr=rep(1:10 , each = 10), value=as.vector(temp) )