Convert a contactmatrix to a tidy data.frame
Usage
# S3 method for class 'contactmatrix'
tidy(x, ...)Examples
cm2d <- new_contactmatrix(
from = c("[0,5)", "[5,10)", "[5,10)"),
to = c("[0,5)", "[10,15)", "[15,20)"),
value = c(0.32 , 0.46 , 0.72 ),
symmetric = TRUE
)
tidy(cm2d)
#> age_from age_to contact
#> 1 [0,5) [0,5) 0.32
#> 2 [10,15) [0,5) 0.00
#> 3 [15,20) [0,5) 0.00
#> 4 [5,10) [0,5) 0.00
#> 5 [0,5) [10,15) 0.00
#> 6 [10,15) [10,15) 0.00
#> 7 [15,20) [10,15) 0.00
#> 8 [5,10) [10,15) 0.46
#> 9 [0,5) [15,20) 0.00
#> 10 [10,15) [15,20) 0.00
#> 11 [15,20) [15,20) 0.00
#> 12 [5,10) [15,20) 0.72
#> 13 [0,5) [5,10) 0.00
#> 14 [10,15) [5,10) 0.00
#> 15 [15,20) [5,10) 0.00
#> 16 [5,10) [5,10) 0.00