logo
Tags down

shadow

How to change the order of fill aesthetic in faceted ggplot?


By : user2175976
Date : October 14 2020, 02:23 PM
I wish this help you I have a faceted ggplot that is all but done. I cannot seem to get the fill aesthetic to be descending for each group in the dodged plot and across facets. The idea is to look at the plot and quickly recognise the top three categories within each group on the y-axis - and that the colors will be order different for each group. Here is some code to get a representative graph. , Something like this maybe:
code :
df %>% 
  ggplot(aes(mean, reorder(vary_x,mean), fill = cats))+
  geom_bar(stat = 'identity',
           position = 'dodge') +
  facet_grid(.~gender) +
  coord_flip()


Share : facebook icon twitter icon

r/ggplot - Use position_jitterdodge without a fill aesthetic


By : digitalblake
Date : March 29 2020, 07:55 AM
Does that help Ok, here's my workaround. Specify fill along with the aesthetic you really want (color in my case), then blank out fill with scale_fill_manual
I produced a different fake dataset that's more similar to my actual use case, since the diamonds data as specified above isn't really a good candidate for box + points
code :
my_dat <- data.frame(class=factor(rep(1:2, 600)),
                     y=rnorm(1200)),
                     x=rep(letters[1:3], each=400))

ggplot(my_dat, aes(x=x, y=y, fill=class, color=class)) +
  geom_boxplot(outlier.shape = NA) +
  geom_point(shape = 21, alpha = 0.5, position=position_jitterdodge()) +
  scale_fill_manual(values = rep(NA, 2)) 

Change stacked bar order when aesthetic fill is based on the interaction of two factors


By : iamdishantpatel
Date : March 29 2020, 07:55 AM
hop of those help? Since the column "rainfall" is a factor column, the values are plot in order. The default is in alphabetical order. To change the plotting order, you need to specify the order of the factors.
In this problem adding levels=c('winter to spring', 'summer') to factor definition will change from alphabetical to the desired order.
code :
library(data.table)
library(ggplot2)

country     <- rep(c('SE', 'FR', 'BE'), each = 2)
rain_fall   <- rep(c('winter to spring', 'summer'), 3)
amount_rain <- c(100, 10, 95, 5, 70, 2)
order       <- c(1, 1, 2, 2, 3, 3)

DT <- data.table(country, rain_fall, amount_rain, order)
DT[, ':='(country = factor(country), rain_fall = factor(rain_fall, levels=c('winter to spring', 'summer')))]


plot_stacked <- ggplot(DT, aes(x = reorder(country, - order), 
                               y   = amount_rain, fill = interaction(country, rain_fall)) )+
                         geom_bar(stat = "identity")
print(plot_stacked)  

ggplot2 change fill for color legend when fill also used in aesthetic


By : user3224740
Date : March 29 2020, 07:55 AM
hope this fix your issue For data-related aspects of the legend, theme() won't help you. Instead you need to use guides and override the fill for the color legend:
code :
ggplot(dat)+
    geom_bar(aes(id, color=var1, fill=var2))+
    scale_color_manual(values=c("A"="black", "B"="grey"))+
    guides(color = guide_legend(override.aes = list(fill = "white"))) +
    theme_light()

How to change the order of aesthetic layers in ggplot?


By : user3653866
Date : March 29 2020, 07:55 AM
I wish this help you You could re-order the levels of your factor and add the color adjustment:
code :
dat %>% ggplot(aes(x = rt, 
                   fill = factor(acc, levels = c(1,0)))) + 
  geom_density(aes(y= ..count..*0.03), alpha = 0.6)+
scale_fill_manual(values = c("1" = "#00BFC4", "0" = "#F8766D"))

ggplot: adding color aesthetic changes stack order


By : Lukasz Somla
Date : March 29 2020, 07:55 AM
it fixes the issue Ah, well here's an answer + work-around. This happens because the aes(color = ...) call is invoked at the geom_text level, rather than in the initial ggplot call.
Unifying to a single aes call will cause geom_col and geom_text to respect the same order, but requires a little hack to get the color aesthetic to show up only for the text layer:
code :
ggplot(dat,
       aes(x, y, fill=category, label=paste0(category, ': ', y),
           color = category == 'a')) +

  # if you call geom_col just like this, you'll get colored borders
  # geom_col() +

  # so you have to blank out the color aesthetic for this geom
  geom_col(color=NA) +

  geom_text(position = position_stack(vjust=.5)) +

  scale_color_manual(values = c("black", 'white'))
Related Posts Related Posts :
  • Issue with replacing string by match in R
  • (very) Simple quantstrat trading model using logistic regression
  • R - count maximum number of consecutive dates
  • Problems using tidyr separate on "|"
  • Default value when calling a function in a for loop
  • Finding values in a matrix from list of values in R
  • count 0's in a zoo (or dataframe) object
  • Finding the first non-zero year in data frame for multiple variables using tidyverse
  • ggplot2 - how to assign geom_text with arrow icon to second yaxis scale
  • regex fails with dollar sign
  • Drop first element of list of lists, condense list of lists? Too many elements?
  • R - how to apply output of ifelse(str_detect ...) to whole group
  • caret package confusion matrix define positive case with multiple classes
  • Generating a pairwise 'distance' matrix
  • Change all R columns names using a reference file
  • In R & dabestr, how do I get grouped differences correctly?
  • Exclude or set a unique color to the bottom triangle of a correlation matrix heatmap
  • r shiny observe function clears text input
  • Split column by multiple delimiters, keeping delimiters
  • How to random search in a specified grid in caret package?
  • merge 2 data frames in a loop for each column in one of them
  • how to edit the codes for the summary of R S4 Object?
  • Remove specific rows in R
  • Flatten JSON list into data frame
  • Filtering a dataset and making a ggplot
  • Align cells vertically to be at the bottom flextable
  • R speed up sapply
  • invalid subscript type 'list' Azure Machine Learning
  • Use rollapply with xts object and an anonymous defined function
  • Isolate data frames from a spreadsheet to create a list
  • Error in xts, as.POSIXct "'order.by' cannot contain 'NA', 'NaN', or 'Inf'"
  • Column splitting in R
  • number similar/duplicated rows in R
  • Count the number of times each value appears in a row dataframe r
  • how to vectorise my code in r using for loop?
  • A function to fill in a column with NA of the same type
  • Network flow balancing constraint in R
  • Adding main titles from list to graphs in for loop
  • create a matrix in Perl or R if data is provided in CSV file
  • Passing column names as string to with
  • R - filtering rows and summing
  • Function to remove outliers by group from dataframe
  • How to find the difference of max & min values in one group in a variable in a dataframe
  • Convert unicode to a readable string
  • Wrong scale/difficult to interpret times on time series object using 'ts'
  • Joining three numeric columns without adding them in r
  • Is there any way to extract the names of columns from an excel sheet without actually loading the sheet into the RAM?
  • case_when() not working: Error in mutate_impl(.data, dots)
  • Hide boxes if input not suitable in Shiny
  • Make nodes as images in R with visNetwork lib
  • Re-shape status columns based on value in another column
  • Why does the plot size differ between docx and html in rmarkdown::render?
  • Reverse x-axis that contains categorical data and a lot of annotations
  • shadow
    Privacy Policy - Terms - Contact Us © voile276.org