diff --git a/README.Rmd b/README.Rmd
index 25868dc..067a537 100644
--- a/README.Rmd
+++ b/README.Rmd
@@ -39,7 +39,7 @@ Forester simply requires the left side of the table (in this case, three columns
 ```{r example}
 library(forester)
 
-table <- readxl::read_excel(here::here("inst/extdata/example_figure_data.xlsx"))
+table <- readxl::read_excel(system.file("extdata", "example_figure_data.xlsx", package = "forester"))
 
 # indent the subgroup if there is a number in the placebo column
 table$Subgroup <- ifelse(is.na(table$Placebo), 
diff --git a/README.md b/README.md
index 88b6032..1750625 100644
--- a/README.md
+++ b/README.md
@@ -33,7 +33,7 @@ which contain the point estimates and confidence intervals.
 ``` r
 library(forester)
 
-table <- readxl::read_excel(here::here("inst/extdata/example_figure_data.xlsx"))
+table <- readxl::read_excel(system.file("extdata", "example_figure_data.xlsx", package = "forester"))
 
 # indent the subgroup if there is a number in the placebo column
 table$Subgroup <- ifelse(is.na(table$Placebo),