diff --git a/src/library/base/R/dates.R b/src/library/base/R/dates.R
index 9496b1d..e69f35c 100644
--- a/src/library/base/R/dates.R
+++ b/src/library/base/R/dates.R
@@ -324,7 +324,7 @@ cut.Date <-
         end <- as.POSIXlt(max(x, na.rm = TRUE))
         end <- as.POSIXlt(end + (31 * 86400))
         end$mday <- 1
-        breaks <- as.Date(seq(start, end, "months"))
+        breaks <- as.Date(seq(start, end, breaks))
     } else if(valid == 4) {
         start$mon <- 0
         start$mday <- 1
@@ -332,7 +332,7 @@ cut.Date <-
         end <- as.POSIXlt(end + (366 * 86400))
         end$mon <- 0
         end$mday <- 1
-        breaks <- as.Date(seq(start, end, "years"))
+        breaks <- as.Date(seq(start, end, breaks))
     } else {
         start <- .Internal(POSIXlt2Date(start))
         if (length(by2) == 2) incr <- incr * as.integer(by2[1])
