diff --git a/ggts.R b/ggts.R
new file mode 100644
index 0000000..7ed6435
--- /dev/null
+++ b/ggts.R
@@ -0,0 +1,5 @@
+ggts <- function(y) {
+  tibble() |> 
+    ggplot(aes(time(y), y)) +
+    geom_line()
+}