Biodem (version 0.5)

rel.cond: Calculates a conditional kinship matrix from isonymy data

Description

"rel.cond" calculates a conditional kinship matrix starting from isonymy data.

Usage

rel.cond(x,R, method="A")

Arguments

x

is a square Unbiased Random Isonymy matrix, possibly obtained using the "uri" function on the raw surname data

R

is an unbiased estimate of Regional Random Isonymy, calculated by the function "rri"

method

a character string specifying the method to be used in the calculation of the coefficients. The available options are "A" and "B". Both the methods give similar results. The "A" method is given as the default option

Value

Returns a square symmetric conditional kinship matrix.

Details

The function implements Relethford's method to calculate kinship coefficients starting from surname data.

References

Relethford, J. H. 1988. Estimation of kinship and genetic distance from surnames. Human Biology, 60(3): 475-492.

See Also

uri to calculate Unbiased Random Isonymy starting from tables of surname frequencies, rri to calculate an an unbiased estimate of Regional Random Isonymy, rel.phi to calculate an 'a priori' kinship matrix from isonymy data

Examples

# NOT RUN {
# starting from a raw marriage records dataset:
data(valley)
tot <- sur.freq(valley,valley$PAR,valley$SURM,valley$SURF)
tot # a frequency table calculated above all the surnames
iso.matrix <- uri(tot)
iso.matrix # an unbiased random isonymy matrix
reg <- rri(tot)
reg # a coefficient of unbiased Regional Random Isonymy
kin.cond <- rel.cond(iso.matrix,reg)
kin.cond # a conditional kinship matrix

#starting from a generic surname frequency table
data(surnames)
surnames # a made-up dataset
iso.matrix <- uri(surnames)
iso.matrix # an unbiased random isonymy matrix
reg <- rri(surnames)
reg # a coefficient of unbiased Regional Random Isonymy
kin.cond <- rel.cond(iso.matrix,reg)
kin.cond # a conditional kinship matrix
# }