diff --git a/vignettes/articles/handling_LOQ.Rmd b/vignettes/articles/handling_LOQ.Rmd
index 92f377a..7f163a0 100644
--- a/vignettes/articles/handling_LOQ.Rmd
+++ b/vignettes/articles/handling_LOQ.Rmd
@@ -255,11 +255,17 @@ optim_full <- poped_optim(poped_db, opt_xt = TRUE,
 ```
 
 ```{r,eval=run_optimizations,echo=FALSE}
-save(optim_D6,optim_D2,optim_full,file = "optim_warf.RData")
+#save(optim_D6,optim_D2,optim_full,file = "optim_warf.RData")
+saveRDS(optim_D6,file = file.path("handling_LOQ_data","optim_D6.rds"))
+saveRDS(optim_D2,file = file.path("handling_LOQ_data","optim_D2.rds"))
+saveRDS(optim_full,file = file.path("handling_LOQ_data","optim_full.rds"))
 ```
 
 ```{r,eval=!run_optimizations,echo=FALSE}
-load(file = "optim_warf.RData")
+#load(file = "optim_warf.RData")
+optim_D6 <- readRDS(file = file.path("handling_LOQ_data","optim_D6.rds"))
+optim_D2 <- readRDS(file = file.path("handling_LOQ_data","optim_D2.rds"))
+optim_full <- readRDS(file = file.path("handling_LOQ_data","optim_full.rds"))
 ```
 
 All designs together in one plot show how the different handling of BLQ data results in different optimal designs.
diff --git a/vignettes/articles/handling_LOQ_data/optim_D2.rds b/vignettes/articles/handling_LOQ_data/optim_D2.rds
new file mode 100644
index 0000000..18fd2e1
Binary files /dev/null and b/vignettes/articles/handling_LOQ_data/optim_D2.rds differ
diff --git a/vignettes/articles/handling_LOQ_data/optim_D6.rds b/vignettes/articles/handling_LOQ_data/optim_D6.rds
new file mode 100644
index 0000000..1228fca
Binary files /dev/null and b/vignettes/articles/handling_LOQ_data/optim_D6.rds differ
diff --git a/vignettes/articles/handling_LOQ_data/optim_full.rds b/vignettes/articles/handling_LOQ_data/optim_full.rds
new file mode 100644
index 0000000..f2c9e0b
Binary files /dev/null and b/vignettes/articles/handling_LOQ_data/optim_full.rds differ