Skip small symbols in plot.mixed()

jranke · Dec 19, 2024 · 5c54f39 · 5c54f39
1 parent f56f8e5
commit 5c54f39
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/R/plot.mixed.mmkin.R b/R/plot.mixed.mmkin.R
@@ -93,7 +93,7 @@ plot.mixed.mmkin <- function(x,
   nrow.legend = ceiling((length(i) + 1) / ncol.legend),
   rel.height.legend = 0.02 + 0.07 * nrow.legend,
   rel.height.bottom = 1.1,
-  pch_ds = c(1:25, 32:127)[1:length(i)],
+  pch_ds = c(1:25, 33, 35:38, 40:41, 47:57, 60:90)[1:length(i)],
   col_ds = pch_ds + 1,
   lty_ds = col_ds,
   frame = TRUE, ...

diff --git a/man/plot.mixed.mmkin.Rd b/man/plot.mixed.mmkin.Rd