kin2cm {skater}

Kinship coefficient to cM

Description

"Converts" a kinship coefficient to put on the same scale as shared cM using the formula cm <- pmin(3560, 4*pmax(0, k)*3560).

Usage

kin2cm(k)

Arguments

k

Kinship coefficient (numeric, typically between 0 and .5, although KING can produce values <0).

Value

A vector of numeric estimated cM, ranging from 0-3560.

References

https://dnapainter.com/tools/sharedcmv4.

https://www.ancestry.com/dna/resource/whitePaper/AncestryDNA-Matching-White-Paper.pdf.

https://verogen.com/wp-content/uploads/2021/03/snp-typing-uas-kinship-estimation-gedmatch-pro-tech-note-vd2020058-a.pdf.

Examples

kin2cm(.25)
kin2cm(.125)
kin2cm(.0625)
dibble(9) %>% dplyr::mutate(cm=kin2cm(k))