Description Usage Arguments Value Examples

A square symmetric kinship matrix is transformed into a tibble, with a row per unique element in the kinship matrix, and three columns: ID of row, ID of column, and the kinship value.

1 | ```
tidy_kinship(kinship, sort = TRUE)
``` |

`kinship` |
The |

`sort` |
If |

A tibble with `n * ( n + 1 ) / 2`

rows (the upper triangle, including the diagonal), and 3 columns with names: `id1`

, `id2`

, `kinship`

.

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 | ```
# create a symmetric matrix
kinship <- matrix(
c(
0.5, 0.1, 0.0,
0.1, 0.5, 0.2,
0.0, 0.2, 0.6
),
nrow = 3
)
# add names (best for tidy version)
colnames(kinship) <- paste0('pop', 1:3)
rownames(kinship) <- paste0('pop', 1:3)
# this returns tidy version
kinship_tidy <- tidy_kinship( kinship )
# test colnames
stopifnot( colnames( kinship_tidy ) == c('id1', 'id2', 'kinship') )
# test row number
stopifnot( nrow( kinship_tidy ) == 6 )
# inspect it
kinship_tidy
``` |

Embedding an R snippet on your website

Add the following code to your website.

For more information on customizing the embed code, read Embedding Snippets.