fixed ped2mit error

Author: smasongarrison

NEWS.md

@@ -6,7 +6,7 @@
 * Fixed missing checkpoint for ram_checkpoint
 * Try a chunk_size argument for ped2com to reduce memory usage during transpose
 * Try filter method for whose relatedness to return by individual ID
-* **Breaking change:** renamed `ytemp` parameter to `obs_ids` in `buildOneFamilyGroup()` and `buildFamilyGroups()` for clarity
+* Renamed `ytemp` parameter to `obs_ids` in `buildOneFamilyGroup()` and `buildFamilyGroups()` for clarity
 * Expanded v6 vignette with data requirements reference and real-data workflow using the `hazard` dataset
 
 # BGmisc 1.6.0.1

vignettes/articles/v61_pedigree_model_fitting.Rmd

@@ -84,7 +84,7 @@ for (i in seq_along(n_families)) {
   phenotypic_ids <- ped_i$ID[!is.na(ped_i$lrs)]
   A_i  <- as.matrix(ped2add(ped_i, sparse = FALSE, keep_ids = phenotypic_ids))
   Cn_i <- as.matrix(ped2cn(ped_i,  sparse = FALSE, keep_ids = phenotypic_ids))
-  Mt_i <- as.matrix(ped2mtd(ped_i,  sparse = FALSE, keep_ids = phenotypic_ids))
+  Mt_i <- as.matrix(ped2mit(ped_i,  sparse = FALSE, keep_ids = phenotypic_ids))
   
    n_i  <- nrow(A_i)
   id_order_i <- rownames(A_i)
@@ -106,7 +106,6 @@ for (i in seq_along(n_families)) {
 }
 
 
-
 group_models <- lapply(seq_len(n_families), function(i) {
   buildOneFamilyGroup(
     group_name  = paste0("ped", i),