diff --git a/strings.Rmd b/strings.Rmd
index ae5207f..86de4b5 100644
--- a/strings.Rmd
+++ b/strings.Rmd
@@ -579,7 +579,7 @@ df <- tibble(
   i = seq_along(word)
 )
 df %>% 
-  filter(str_detect(words, "x$"))
+  filter(str_detect(word, "x$"))
 ```