Calculates IBS mean and standard deviation between two samples.

ibs.pair(g1, g2)

Arguments

g1

Genotype vector for first sample.

g2

Genotype vector for second sample.

Value

Numeric vector: [mean IBS, standard deviation].

Author

Roberto Higa

Examples

g1 <- sample(0:2, 10, TRUE)
g2 <- sample(0:2, 10, TRUE)
ibs.pair(g1, g2)
#> [1] 2 0