diff --git a/R/geom-ribbon.R b/R/geom-ribbon.R
index 746684afbe..fb0c6c9040 100644
--- a/R/geom-ribbon.R
+++ b/R/geom-ribbon.R
@@ -183,7 +183,7 @@ GeomRibbon <- ggproto("GeomRibbon", Geom,
     if ((length(aes$fill) > 1 || length(aes$alpha) > 1)) {
       transformed <- coord$transform(flip_data(data, flipped_aes), panel_params)
       if (flipped_aes) {
-        keep <- is.finite(tranformed$y)
+        keep <- is.finite(transformed$y)
         args <- list(
           colours = alpha(data$fill, data$alpha)[keep],
           stops = rescale(transformed$y)[keep],