update plot_progeny_dosage_change

NAMESPACE

@@ -122,7 +122,6 @@ export(plot_map_list)
 export(plot_mappoly.map2)
 export(plot_mrk_info)
 export(plot_progeny_dosage_change)
-export(poly_cross_simulate)
 export(print_mrk)
 export(read_fitpoly)
 export(read_geno)

R/plot_progeny_dosage_change.R

@@ -16,8 +16,8 @@
 #' @return A ggplot of the changed and imputed genotypic dosages
 #'
 #' @examples
-#'     plot_progeny_dosage_change(map_list=solcap.dose.map, error=0.05)
-#'     
+#'     x<-get_submap(solcap.err.map[[1]], 1:30, reestimate.rf = FALSE)
+#'     plot_progeny_dosage_change(list(x), error=0.05)     
 #'
 #' @author Jeekin Lau, \email{[email protected]}, with optimization by Cristiane Taniguti, \email{[email protected]}
 #'
@@ -26,6 +26,7 @@
 #' @export plot_progeny_dosage_change
 
 plot_progeny_dosage_change <- function(map_list, error, verbose=T){
+  Var1 <- Var2 <- value <- NULL
   map=map_list
   if(!exists(map[[1]]$info$data.name)) stop("mappoly.data object not here")