Skip to content

Commit 9e05952

Browse files
committed
Use full argument names
1 parent f9915d0 commit 9e05952

File tree

4 files changed

+7
-7
lines changed

4 files changed

+7
-7
lines changed

R/coord-flip.r

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -71,6 +71,6 @@ icon.flip <- function(.) {
7171
segmentsGrob(0, 0, 0, 1),
7272
segmentsGrob(0, 0, 1, 0),
7373
linesGrob(0.9 * sin(angles), 0.9 * cos(angles), arrow=arrow(length=unit(0.05, "npc"))),
74-
linesGrob(0.5 * sin(angles), 0.5 * cos(angles), arrow=arrow(end="first", length= unit(0.05, "npc")))
74+
linesGrob(0.5 * sin(angles), 0.5 * cos(angles), arrow=arrow(ends="first", length= unit(0.05, "npc")))
7575
))
7676
}

R/scale-gradient2.r

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -51,15 +51,15 @@
5151
scale_colour_gradient2 <- function(..., low = muted("red"), mid = "white", high = muted("blue"), midpoint = 0, space = "rgb", na.value = "grey50") {
5252
continuous_scale("colour", "gradient2",
5353
div_gradient_pal(low, mid, high, space), na.value = na.value, ...,
54-
rescale = mid_rescaler(mid = midpoint))
54+
rescaler = mid_rescaler(mid = midpoint))
5555
}
5656

5757
#' @rdname scale_gradient2
5858
#' @export
5959
scale_fill_gradient2 <- function(..., low = muted("red"), mid = "white", high = muted("blue"), midpoint = 0, space = "rgb", na.value = "grey50") {
6060
continuous_scale("fill", "gradient2",
6161
div_gradient_pal(low, mid, high, space), na.value = na.value, ...,
62-
rescale = mid_rescaler(mid = midpoint))
62+
rescaler = mid_rescaler(mid = midpoint))
6363
}
6464

6565
mid_rescaler <- function(mid) {

R/scale-gradientn.r

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -27,9 +27,9 @@
2727
#' values <- seq(-max_val, max_val, length = 11)
2828
#'
2929
#' d + scale_colour_gradientn(colours = topo.colors(10),
30-
#' values = values, rescale = function(x, ...) x, oob = identity)
30+
#' values = values, rescaler = function(x, ...) x, oob = identity)
3131
#' d + scale_colour_gradientn(colours = terrain.colors(10),
32-
#' values = values, rescale = function(x, ...) x, oob = identity)
32+
#' values = values, rescaler = function(x, ...) x, oob = identity)
3333
#' }
3434
scale_colour_gradientn <- function(..., colours, values = NULL, space = "Lab", na.value = "grey50") {
3535
continuous_scale("colour", "gradientn",

man/scale_gradientn.Rd

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -53,9 +53,9 @@ max_val <- max(abs(dsub$diff))
5353
values <- seq(-max_val, max_val, length = 11)
5454

5555
d + scale_colour_gradientn(colours = topo.colors(10),
56-
values = values, rescale = function(x, ...) x, oob = identity)
56+
values = values, rescaler = function(x, ...) x, oob = identity)
5757
d + scale_colour_gradientn(colours = terrain.colors(10),
58-
values = values, rescale = function(x, ...) x, oob = identity)
58+
values = values, rescaler = function(x, ...) x, oob = identity)
5959
}
6060
}
6161
\seealso{

0 commit comments

Comments
 (0)