Fix a typo (#3730)

* Fix a typo

* Fix one more typo

Fix #3737

Author: yutannihilation

R/scale-.r

@@ -291,7 +291,7 @@ binned_scale <- function(aesthetics, scale_name, palette, name = waiver(),
 #'   position scales, only the continuous range is reset.
 #'
 #' - `map()` Map transformed data values to some output value as
-#'   determined by `self$rescale()` and `self$pallete` (except for position scales,
+#'   determined by `self$rescale()` and `self$palette` (except for position scales,
 #'   which do not use the default implementation of this method). The output corresponds
 #'   to the transformed data value in aesthetic space (e.g., a color, line width, or size).
 #'

R/theme-elements.r

@@ -2,7 +2,7 @@
 #'
 #' @description
 #' In conjunction with the \link{theme} system, the `element_` functions
-#' specify the display of how non-data components of the plot are a drawn.
+#' specify the display of how non-data components of the plot are drawn.
 #'
 #'   - `element_blank`: draws nothing, and assigns no space.
 #'   - `element_rect`: borders and backgrounds.