Add integer/double scale_type methods (#5168)

teunbrand · web-flow · commit 37d9e8cc463b · 2023-02-09T19:52:22.000+01:00
diff --git a/NAMESPACE b/NAMESPACE
@@ -132,8 +132,10 @@ S3method(scale_type,Date)
 S3method(scale_type,POSIXt)
 S3method(scale_type,character)
 S3method(scale_type,default)
+S3method(scale_type,double)
 S3method(scale_type,factor)
 S3method(scale_type,hms)
+S3method(scale_type,integer)
 S3method(scale_type,list)
 S3method(scale_type,logical)
 S3method(scale_type,numeric)
diff --git a/R/scale-type.R b/R/scale-type.R
@@ -91,5 +91,11 @@ scale_type.Date <- function(x) c("date", "continuous")
 #' @export
 scale_type.numeric <- function(x) "continuous"
 
+#' @export
+scale_type.integer <- function(x) "continuous"
+
+#' @export
+scale_type.double <- function(x) "continuous"
+
 #' @export
 scale_type.hms <- function(x) "time"
