example_gt <- load_example_gt("gen_tbl")
X <- attr(example_gt$genotypes, "fbm")
snp_king(X)
# Compute for individuals 1 to 5
snp_king(X, ind.row = 1:5, ind.col = 1:5)
# Adjust block size
snp_king(X, block.size = 2)
Run the code above in your browser using DataLab