diff --git a/vignettes/images/show_code_prepro_missing.png b/vignettes/images/show_code_prepro_missing.png
index 7fbd2ae81f..9ce3a2e742 100644
Binary files a/vignettes/images/show_code_prepro_missing.png and b/vignettes/images/show_code_prepro_missing.png differ
diff --git a/vignettes/images/show_code_prepro_present.png b/vignettes/images/show_code_prepro_present.png
index 03f0046313..77c8ec7771 100644
Binary files a/vignettes/images/show_code_prepro_present.png and b/vignettes/images/show_code_prepro_present.png differ
diff --git a/vignettes/including-data-in-teal-applications.Rmd b/vignettes/including-data-in-teal-applications.Rmd
index 4241fc5124..6449b54ff5 100644
--- a/vignettes/including-data-in-teal-applications.Rmd
+++ b/vignettes/including-data-in-teal-applications.Rmd
@@ -79,30 +79,35 @@ data_populated_2 <- within(data_empty, {
})
```
-The key difference between `eval_code` and `within` is that the former accepts code as character vector or language objects (calls and expressions), while `within` accepts _only_ inline code.
-See `?qenv` for more details.
+The key difference between `eval_code` and `within` is that the former accepts code as character vector or language objects (`call`s and `expression`s), while `within` accepts *only* inline code.
+For a deeper understanding check the low level class `?qenv` for more details.
-Note that in the first example `data` was created by passing data objects, so the code that was used to create the data objects is unknown and therefore the process cannot be reproduced.
-Inspecting code the in the app created above reveals a note that the preprocessing code is absent.
+Note that in the first example `data` was created by passing data objects.
+If it can be found on the base environment it will be processed without errors:
-The necessary code can be supplied to the `code` argument of the `teal_data` function.
+However, if there isn't code to generate the object they cannot be reproduced.
+This creates an object with an error like in a interactive R session (and will cause the application to fail).
+Inspecting object reveals it:
```{r}
-data_with_code <- teal_data(
- iris = iris, cars = mtcars,
- code = "iris <- iris
- cars <- mtcars"
-)
+m <- diag(5)
+data_populated_3 <- eval_code(data_empty, code = "D5 <- m")
+data_populated_3
```
-
+The necessary code can be supplied to the `code` argument of the to the `eval_code` function .
-Keep in mind this code is not executed in the `teal_data`'s environment, so it may not reproduce the environment.
-Such an object is considered _unverified_ (see [`verified` property](#verified)).
+```{r}
+data_populated_4 <- eval_code(data_empty, code = "D5 <- diag(5)")
+data_populated_4
+```
-If reproducibility is required, we recommend creating an empty `teal_data` object and then evaluating code.
+As you can see above the output shows that is a verified object.
+On an application we don't see that message but the reproducible code will be shown, as we can see using the `data_populated_2` object:
+
+
#### code from file
@@ -217,8 +222,6 @@ The `verified` property designates whether or not reproducibility has been confi
Those created with data objects alone or with data objects and code are not verified by default, but can become verified by running the `verify` function.
```{r}
-data_with_code
-
data_with_objects_and_code <- teal_data(iris = iris, cars = mtcars, code = expression(iris <- iris, cars <- mtcars))
data_with_objects_and_code