diff --git a/R/utils.R b/R/utils.R
index 154b4e9..62b1cb5 100644
--- a/R/utils.R
+++ b/R/utils.R
@@ -267,7 +267,7 @@ globalVariables(c("UnitCode",
 #' }
 .get_user_input <- function () {
 
-  var1 <- readline(prompt = ">1: Yes\n>2: No\n")
+  var1 <- readline(prompt = "1: Yes\n2: No\n")
   return(var1)
 }