Graph 2

Packages

library(tidyverse)

library(tidyverse)

Dataset

Download from https://docs.google.com/spreadsheets/d/1Toda_qdUJHsWE6-p6Au0KSRnJuB07CJPordKMo4av2o/edit?usp=sharing

df_long_2 <- read_csv("df_long_2.csv")

Missing column names filled in: 'X1' [1]Parsed with column specification:
cols(
  X1 = col_integer(),
  byTooth = col_character(),
  valueByTooth = col_integer(),
  RegionName = col_character()
)

Change to latvian

Graph

df_long_2 %>% 
        ggplot(aes(factor(lv), valueByTooth)) +
        geom_boxplot(aes(fill = factor(RegionName))) + 
         scale_colour_grey() + theme_minimal() +
        labs(title = " ", x = " ", y = "Zobi", color = "Dzimums\n") +
        scale_fill_discrete(guide = guide_legend(title = "reģions")) +
        scale_fill_grey() +
        labs(fill = ' ') 

Scale for 'fill' is already present. Adding another scale for 'fill', which will replace the existing scale.