From 68f88e2b733d2f91769359e7e245472ccc87a2bf Mon Sep 17 00:00:00 2001
From: Ben Letham <bletham@gmail.com>
Date: Tue, 4 Apr 2017 16:28:34 -0700
Subject: [PATCH] Raise exception if date parsing fails

---
 R/R/prophet.R | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/R/R/prophet.R b/R/R/prophet.R
index 5f56196..bbd4a49 100644
--- a/R/R/prophet.R
+++ b/R/R/prophet.R
@@ -218,6 +218,9 @@ setup_dataframe <- function(m, df, initialize_scales = FALSE) {
     df$y <- as.numeric(df$y)
   }
   df$ds <- zoo::as.Date(df$ds)
+  if (anyNA(df$ds)) {
+    stop('Unable to parse date format in column ds. Convert to date format.')
+  }
 
   df <- df %>%
     dplyr::arrange(ds)