Update README.Rmd

README.Rmd

@@ -50,10 +50,53 @@ Roadmap is as follows:
 Please, do not hesitate to pull request any new viz or colors or color palettes, or to email request any change (guillaume.noblet@reach-initiative.org or gnoblet@zaclys.net).
 
 
-## Example
+## Example 1: extracting colors
 
-```{r example, eval = FALSE}
+Color palettes for REACH, AGORA and IMPACT are available. Functions to access colors and palettes are `cols_initiative()` or `pal_initiative()`. For now, the initiative with the most colors and color palettes is REACH. Feel free to pull requests new AGORA and IMPACT colors.
+
+```{r example-colors, eval = FALSE}
 library(visualizeR)
+
 # Get all saved REACH colors, named
-cols_reach(unnamed = F)
+cols_reach(unnamed = F)[1:10]
+
+# Extract a color palette as hexadecimal codes and reversed
+pal_reach(palette = "main", reversed = TRUE, color_ramp_palette = FALSE)
+
+# Get all color palettes names
+pal_reach(show_palettes = T)
 ```
+## Example 2: Bar chart, already REACH themed
+
+```{r example-bar-chart, eval = TRUE}
+library(visualizeR)
+library(palmerpenguins)
+library(dplyr)
+
+df <- penguins |> 
+  group_by(island, species) |> 
+  summarize(
+    mean_bl = mean(bill_length_mm, na.rm = T),
+    mean_fl = mean(flipper_length_mm, na.rm = T)) |> 
+  ungroup()
+
+# Simple bar chart by group
+bar_reach(df, mean_bl, island, species, percent = FALSE, x_title = "Mean of bill length")
+
+# Using another color palette
+bar_reach(df, mean_bl, island, species, percent = FALSE, palette = "artichoke_3", legend_rev = TRUE)
+```
+
+## Example 3: Point chart, already REACH themed
+```{r example-point-chart, eval = TRUE}
+
+# Simple point chart
+point_reach(penguins, bill_length_mm, flipper_length_mm)
+
+# Point chart with grouping colors, greater dot size, some transparency, reversed color palette
+point_reach(penguins, bill_length_mm, flipper_length_mm, island, alpha = 0.5, size = 2, reverse = TRUE)
+
+# Using another color palettes
+point_reach(penguins, bill_length_mm, flipper_length_mm, island, palette = "artichoke_3")
+```
+