diff --git a/article/.RData b/article/.RData
index 2d28e69080b308fdd578712a9852989a5f7c481a..0635a39faf60446f97ef72cbdeeddaf9283f8195 100644
Binary files a/article/.RData and b/article/.RData differ
diff --git a/article/article_figures.Rmd b/article/article_figures.Rmd
index dff498007c0a4b0ecd8827f52c835e935464d1b2..3d43b578a5a9d49db0eed958ce95c59fa58bd08b 100644
--- a/article/article_figures.Rmd
+++ b/article/article_figures.Rmd
@@ -1351,3 +1351,14 @@ prop_rem %<>% mutate(notpoly=case_when(som==4 & (exclude_poly+exclude_poly.2+exc
 prop_rem %>% group_by(notpoly) %>% summarise(n=n())
 ```
 
+## Are markers excluded by mark_estmap okay in other crosses ? 
+
+```{r}
+#keep all markers with non mendelian prop in at least 1 dataset
+map_rem <- tab_alldata %>% filter(exclude_estmap==1 |
+                       exclude_estmap.2==1 |
+                       exclude_estmap.3==1 |
+                       exclude_estmap.4==1)
+
+
+```
\ No newline at end of file