Removing long-line note

Author: ldecicco-USGS

R/error_bars.R

@@ -24,8 +24,11 @@
 #' gsNew <- abline(gsNew, b=1, a=0, legend.name="1:1")
 #' gsNew <- legend(gsNew, location = "topleft",title="Awesome!")
 #' gsNew <- grid(gsNew)
-#' gsNew <- error_bar(gsNew, 1:3, y=c(3,1,2), offset.up=c(0.5,0.25,1), offset.down=0.1)
-#' gsNew <- error_bar(gsNew, x=1:3, y=c(3,1,2), offset.left=c(.2,NA,.2), offset.right=.2, col="red",lwd=3)
+#' gsNew <- error_bar(gsNew, 1:3, y=c(3,1,2), 
+#'                    offset.up=c(0.5,0.25,1), offset.down=0.1)
+#' gsNew <- error_bar(gsNew, x=1:3, y=c(3,1,2), 
+#'                    offset.left=c(.2,NA,.2), 
+#'                    offset.right=.2, col="red",lwd=3)
 #' gsNew <- title(gsNew, "Graphing Fun")
 #' gsNew
 #'