diff --git a/NEWS.md b/NEWS.md
index 084f0b0a66..83cd1abcd5 100644
--- a/NEWS.md
+++ b/NEWS.md
@@ -1,5 +1,7 @@
 # ggplot2 (development version)
 
+* `geom_linerange()` now respects the `na.rm` argument (#4927, @thomasp85)
+
 * Improve the support for `guide_axis()` on `coord_trans()` (@yutannihilation, #3959)
 
 * `geom_density()` and `stat_density()` now support `bounds` argument
diff --git a/R/geom-linerange.r b/R/geom-linerange.r
index beb1b23cc6..652ac410ac 100644
--- a/R/geom-linerange.r
+++ b/R/geom-linerange.r
@@ -113,11 +113,11 @@ GeomLinerange <- ggproto("GeomLinerange", Geom,
     data
   },
 
-  draw_panel = function(data, panel_params, coord, lineend = "butt", flipped_aes = FALSE) {
+  draw_panel = function(data, panel_params, coord, lineend = "butt", flipped_aes = FALSE, na.rm = FALSE) {
     data <- flip_data(data, flipped_aes)
     data <- transform(data, xend = x, y = ymin, yend = ymax)
     data <- flip_data(data, flipped_aes)
-    ggname("geom_linerange", GeomSegment$draw_panel(data, panel_params, coord, lineend = lineend))
+    ggname("geom_linerange", GeomSegment$draw_panel(data, panel_params, coord, lineend = lineend, na.rm = na.rm))
   },
 
   rename_size = TRUE