Change na.value for continous scale to NA_real_. Fixes #627

tidyverse · Jul 18, 2012 · 404f72f · 404f72f
1 parent 64ad8d3
commit 404f72f
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/R/scale-.r b/R/scale-.r
@@ -35,7 +35,7 @@ NULL
 #'   (i.e. \code{\link{scale_colour_gradient2}}, \code{\link{scale_colour_gradientn}}).
 #' @param oob What to do with values outside scale limits (out of bounds)?
 #' @keywords internal
-continuous_scale <- function(aesthetics, scale_name, palette, name = NULL, breaks = waiver(), minor_breaks = waiver(), labels = waiver(), legend = NULL, limits = NULL, rescaler = rescale, oob = censor, expand = waiver(), na.value = NA, trans = "identity", guide="legend") {
+continuous_scale <- function(aesthetics, scale_name, palette, name = NULL, breaks = waiver(), minor_breaks = waiver(), labels = waiver(), legend = NULL, limits = NULL, rescaler = rescale, oob = censor, expand = waiver(), na.value = NA_real_, trans = "identity", guide="legend") {
 
   if (!is.null(legend)) {
     warning("\"legend\" argument in scale_XXX is deprecated. Use guide=\"none\" for suppress the guide display.")

diff --git a/man/continuous_scale.Rd b/man/continuous_scale.Rd
@@ -6,7 +6,7 @@
     name = NULL, breaks = waiver(),
     minor_breaks = waiver(), labels = waiver(),
     legend = NULL, limits = NULL, rescaler = rescale,
-    oob = censor, expand = waiver(), na.value = NA,
+    oob = censor, expand = waiver(), na.value = NA_real_,
     trans = "identity", guide = "legend")
 }
 \arguments{