diff --git a/R/trace_explorer.R b/R/trace_explorer.R
index 55f9d11..dd38dcc 100644
--- a/R/trace_explorer.R
+++ b/R/trace_explorer.R
@@ -89,7 +89,7 @@ trace_explorer.eventlog <- function(log,
                   "x" = "You supplied a {.cls {class(coverage)}}: {.val {coverage}}"))
   } else if(is.null(coverage)) {
     if(n_traces <= 0 || !is_integerish(n_traces, n = 1))
-      cli_abort(c("{.arg n_traces} must be an interger-like {.cls numeric} larger than {.val {0}}.",
+      cli_abort(c("{.arg n_traces} must be an integer-like {.cls numeric} larger than {.val {0}}.",
                   "x" = "You supplied a {.cls {class(n_traces)}}: {.val {n_traces}}"))
   }
 
diff --git a/tests/testthat/_snaps/trace_explorer.md b/tests/testthat/_snaps/trace_explorer.md
index 68af157..0e9c1d0 100644
--- a/tests/testthat/_snaps/trace_explorer.md
+++ b/tests/testthat/_snaps/trace_explorer.md
@@ -20,22 +20,22 @@
 
 # test trace_explorer on eventlog with param `n_traces`
 
-    `n_traces` must be an interger-like <numeric> larger than 0.
+    `n_traces` must be an integer-like <numeric> larger than 0.
     x You supplied a <numeric>: -1
 
 ---
 
-    `n_traces` must be an interger-like <numeric> larger than 0.
+    `n_traces` must be an integer-like <numeric> larger than 0.
     x You supplied a <numeric>: 0
 
 ---
 
-    `n_traces` must be an interger-like <numeric> larger than 0.
+    `n_traces` must be an integer-like <numeric> larger than 0.
     x You supplied a <numeric>: 1.5
 
 ---
 
-    `n_traces` must be an interger-like <numeric> larger than 0.
+    `n_traces` must be an integer-like <numeric> larger than 0.
     x You supplied a <character>: "1"
 
 # test trace_explorer on eventlog with param `type`