/dports/graphics/R-cran-ggplot2/ggplot2/R/ |
H A D | geom-ribbon.r | 89 data$flipped_aes <- params$flipped_aes 90 data <- flip_data(data, params$flipped_aes) 93 abort(glue("Either ", flipped_names(params$flipped_aes)$ymin, " or ", 98 flip_data(data, params$flipped_aes) 108 data <- flip_data(data, flipped_aes) 145 positions_upper <- flip_data(positions_upper, flipped_aes) 146 positions_lower <- flip_data(positions_lower, flipped_aes) 228 params$flipped_aes <- has_flipped_aes(data, params, ambiguous = TRUE) 233 data$flipped_aes <- params$flipped_aes 234 data <- flip_data(data, params$flipped_aes) [all …]
|
H A D | geom-linerange.r | 101 params$flipped_aes <- has_flipped_aes(data, params, range_is_orthogonal = TRUE) 103 if (!(params$flipped_aes || all(c("x", "ymin", "ymax") %in% c(names(data), names(params))))) { 112 data$flipped_aes <- params$flipped_aes 116 draw_panel = function(data, panel_params, coord, flipped_aes = FALSE) { argument 117 data <- flip_data(data, flipped_aes) 119 data <- flip_data(data, flipped_aes)
|
H A D | position-dodge.r | 97 flipped_aes <- has_flipped_aes(data) functionVar 98 data <- flip_data(data, flipped_aes) 114 flipped_aes = flipped_aes nameattr 119 data <- flip_data(data, params$flipped_aes) 123 flip_data(data, params$flipped_aes) 127 data <- flip_data(data, params$flipped_aes) 136 flip_data(collided, params$flipped_aes)
|
H A D | geom-boxplot.r | 172 params$flipped_aes <- has_flipped_aes(data, params) 177 data$flipped_aes <- params$flipped_aes 178 data <- flip_data(data, params$flipped_aes) 205 flip_data(data, params$flipped_aes) 213 notch = FALSE, notchwidth = 0.5, varwidth = FALSE, flipped_aes = FALSE) { argument 214 data <- flip_data(data, flipped_aes) 238 whiskers <- flip_data(whiskers, flipped_aes) 254 box <- flip_data(box, flipped_aes) 268 outliers <- flip_data(outliers, flipped_aes) 278 GeomCrossbar$draw_panel(box, fatten = fatten, panel_params, coord, flipped_aes = flipped_aes)
|
H A D | geom-violin.r | 119 params$flipped_aes <- has_flipped_aes(data, params, ambiguous = TRUE) 126 data$flipped_aes <- params$flipped_aes 127 data <- flip_data(data, params$flipped_aes) 135 flip_data(data, params$flipped_aes) 138 draw_group = function(self, data, ..., draw_quantiles = NULL, flipped_aes = FALSE) { argument 139 data <- flip_data(data, flipped_aes) 155 newdata <- flip_data(newdata, flipped_aes) 173 both <- flip_data(both, flipped_aes)
|
H A D | stat-boxplot.r | 51 data <- flip_data(data, params$flipped_aes) 59 flip_data(data, params$flipped_aes) 63 params$flipped_aes <- has_flipped_aes(data, params, main_is_orthogonal = TRUE, 66 data <- flip_data(data, params$flipped_aes) 85 …compute_group = function(data, scales, width = NULL, na.rm = FALSE, coef = 1.5, flipped_aes = FALS… argument 86 data <- flip_data(data, flipped_aes) 122 df$flipped_aes <- flipped_aes 123 flip_data(df, flipped_aes)
|
H A D | stat-count.r | 56 params$flipped_aes <- has_flipped_aes(data, params, main_is_orthogonal = FALSE) 68 x <- if (params$flipped_aes) "y" else "x" 77 compute_group = function(self, data, scales, width = NULL, flipped_aes = FALSE) { argument 78 data <- flip_data(data, flipped_aes) 90 flipped_aes = flipped_aes nameattr 92 flip_data(bars, flipped_aes)
|
H A D | geom-col.r | 41 params$flipped_aes <- has_flipped_aes(data, params) 48 data$flipped_aes <- params$flipped_aes 49 data <- flip_data(data, params$flipped_aes) 56 flip_data(data, params$flipped_aes) 59 draw_panel = function(self, data, panel_params, coord, width = NULL, flipped_aes = FALSE) { argument
|
H A D | geom-pointrange.r | 50 draw_panel = function(data, panel_params, coord, fatten = 4, flipped_aes = FALSE) { argument 51 if (is.null(data[[flipped_names(flipped_aes)$y]])) 52 return(GeomLinerange$draw_panel(data, panel_params, coord, flipped_aes = flipped_aes)) 56 GeomLinerange$draw_panel(data, panel_params, coord, flipped_aes = flipped_aes),
|
H A D | geom-bar.r | 122 params$flipped_aes <- has_flipped_aes(data, params) 129 data$flipped_aes <- params$flipped_aes 130 data <- flip_data(data, params$flipped_aes) 137 flip_data(data, params$flipped_aes) 140 draw_panel = function(self, data, panel_params, coord, width = NULL, flipped_aes = FALSE) { argument
|
H A D | geom-errorbar.r | 45 data$flipped_aes <- params$flipped_aes 46 data <- flip_data(data, params$flipped_aes) 52 flip_data(data, params$flipped_aes) 55 draw_panel = function(data, panel_params, coord, width = NULL, flipped_aes = FALSE) { argument 56 data <- flip_data(data, flipped_aes) 69 data <- flip_data(data, flipped_aes)
|
H A D | position-jitterdodge.R | 46 flipped_aes <- has_flipped_aes(data) functionVar 47 data <- flip_data(data, flipped_aes) 62 flipped_aes = flipped_aes nameattr 67 data <- flip_data(data, params$flipped_aes) 75 flip_data(data, params$flipped_aes)
|
H A D | geom-smooth.r | 125 … params$flipped_aes <- has_flipped_aes(data, params, range_is_orthogonal = TRUE, ambiguous = TRUE) 142 draw_group = function(data, panel_params, coord, se = FALSE, flipped_aes = FALSE) { argument 146 ymin = flipped_names(flipped_aes)$ymin 147 ymax = flipped_names(flipped_aes)$ymax 151 if (has_ribbon) GeomRibbon$draw_group(ribbon, panel_params, coord, flipped_aes = flipped_aes),
|
H A D | stat-ecdf.r | 79 …params$flipped_aes <- has_flipped_aes(data, params, main_is_orthogonal = FALSE, main_is_continuous… 90 compute_group = function(data, scales, n = NULL, pad = TRUE, flipped_aes = FALSE) { argument 91 data <- flip_data(data, flipped_aes) 105 df_ecdf$flipped_aes <- flipped_aes 106 flip_data(df_ecdf, flipped_aes)
|
H A D | position-stack.r | 149 flipped_aes <- has_flipped_aes(data) functionVar 150 data <- flip_data(data, flipped_aes) 156 flipped_aes = flipped_aes nameattr 161 data <- flip_data(data, params$flipped_aes) 176 flip_data(data, params$flipped_aes) 180 data <- flip_data(data, params$flipped_aes) 207 flip_data(data, params$flipped_aes)
|
H A D | stat-density.r | 73 …params$flipped_aes <- has_flipped_aes(data, params, main_is_orthogonal = FALSE, main_is_continuous… 87 n = 512, trim = FALSE, na.rm = FALSE, flipped_aes = FALSE) { argument 88 data <- flip_data(data, flipped_aes) 92 range <- scales[[flipped_names(flipped_aes)$x]]$dimension() 97 density$flipped_aes <- flipped_aes 98 flip_data(density, flipped_aes)
|
H A D | stat-ydensity.r | 65 …params$flipped_aes <- has_flipped_aes(data, params, main_is_orthogonal = TRUE, group_has_equal = T… 73 kernel = "gaussian", trim = TRUE, na.rm = FALSE, flipped_aes = FALSE) { argument 98 scale = "area", flipped_aes = FALSE) { argument 99 data <- flip_data(data, flipped_aes) 116 data$flipped_aes <- flipped_aes 117 flip_data(data, flipped_aes)
|
H A D | stat-bin.r | 88 params$flipped_aes <- has_flipped_aes(data, params, main_is_orthogonal = FALSE) 99 x <- flipped_names(params$flipped_aes)$x 139 breaks = NULL, flipped_aes = FALSE, argument 144 x <- flipped_names(flipped_aes)$x 161 bins$flipped_aes <- flipped_aes 162 flip_data(bins, flipped_aes)
|
H A D | stat-summary-bin.R | 65 params$flipped_aes <- has_flipped_aes(data, params, ambiguous = TRUE) 73 flipped_aes = FALSE) { argument 74 data <- flip_data(data, flipped_aes) 76 x <- flipped_names(flipped_aes)$x 85 out$flipped_aes <- flipped_aes 86 flip_data(out, flipped_aes)
|
H A D | stat-summary.r | 184 params$flipped_aes <- has_flipped_aes(data, params) 190 na.rm = FALSE, flipped_aes = FALSE) { argument 191 data <- flip_data(data, flipped_aes) 194 summarised$flipped_aes <- flipped_aes 195 flip_data(summarised, flipped_aes)
|
H A D | stat-smooth.r | 89 params$flipped_aes <- has_flipped_aes(data, params, ambiguous = TRUE) 129 na.rm = FALSE, flipped_aes = NA) { argument 130 data <- flip_data(data, flipped_aes) 176 prediction$flipped_aes <- flipped_aes 177 flip_data(prediction, flipped_aes)
|
/dports/graphics/R-cran-ggplot2/ggplot2/tests/testthat/ |
H A D | test-stat-ecdf.R | 6 expect_false(x$flipped_aes[1]) 10 expect_true(y$flipped_aes[1]) 12 x$flipped_aes <- NULL 13 y$flipped_aes <- NULL
|
H A D | test-geom-bar.R | 19 expect_false(x$flipped_aes[1]) 23 expect_true(y$flipped_aes[1]) 25 x$flipped_aes <- NULL 26 y$flipped_aes <- NULL
|
H A D | test-stat-density.R | 11 expect_false(x$flipped_aes[1]) 15 expect_true(y$flipped_aes[1]) 17 x$flipped_aes <- NULL 18 y$flipped_aes <- NULL
|
H A D | test-geom-col.R | 23 expect_false(x$flipped_aes[1]) 27 expect_true(y$flipped_aes[1]) 29 x$flipped_aes <- NULL 30 y$flipped_aes <- NULL
|