diff --git a/R/waitALittle.R b/R/waitALittle.R
new file mode 100644
index 0000000..f448afc
--- /dev/null
+++ b/R/waitALittle.R
@@ -0,0 +1,4 @@
+waitALittle <- function() {
+  A <- rand(500)
+  invisible(gammaln(A))
+}