gay flags

NEWS.md

@@ -1,7 +1,7 @@
 # gglgbtq (development version)
 
 * Added `scale_color_lgbtq()` and `scale_fill_lgbtq()` for convenience.
-* Implemented the following palettes: `acesthetic`, `analterous`, `asensual`, `ace_spectrum`, `aro_spectrum`, `aroace`, `androsexual`, `gynesexual`, `helian`, `lunarian`, `solarian`, `stellarian`, `amatopunk`, `butch`, `femme`.
+* Implemented the following palettes: `acesthetic`, `analterous`, `asensual`, `ace_spectrum`, `aro_spectrum`, `aroace`, `androsexual`, `gynesexual`, `helian`, `lunarian`, `solarian`, `stellarian`, `amatopunk`, `bear`, `butch`, `femme`, `otter`.
 
 # gglgbtq 0.1.1
 

R/data.R

@@ -113,10 +113,16 @@ pride_data <- list(
   amatopunk = list(
     colors = c("#531768", "#B74D71", "#DB966D", "#FFE7AA", "#4E8C69")
   ),
+  bear = list(
+    colors = c("#623804", "#D56300", "#FEDD63", "#FEE6B8", "#FFFFFF", "#555555", "#000000")
+  ),
   butch = list(
     colors = c("#324070", "#6A7AA4", "#8A92A9", "#EDECEB", "#C0B4DB", "#764EC5", "#51048A")
   ),
   femme = list(
     colors = c("#7D0037", "#DE42F1", "#FDFDFD", "#F29C41", "#9E470E")
+  ),
+  otter = list(
+    colors = c("#23A8FA", "#9AD7FC", "#FFFFFF", "#B4B4B4", "#2A2A2A")
   )
 )

vignettes/gallery.Rmd

@@ -258,6 +258,12 @@ palette_lgbtq("amatopunk")
 
 Amatopunks challenge the amatonormativity, i.e. the societal expectations that everybody should desire a monogamous sexual and romantic relationship, exclusive towards polyamorous, asexual, and aromantic people (as in, belonging to any of these three groups).
 
+```{r bear}
+palette_lgbtq("bear")
+```
+
+Typically "bears" are gay men (or masculine-aligned nonbinary people) with plethora of body hair and - usually - a sizable overall volume, whether from being fat, muscular, or stocky.
+
 ```{r butch}
 palette_lgbtq("butch")
 ```
@@ -270,6 +276,10 @@ palette_lgbtq("femme")
 
 "Femme" is a term most commonly used to describe a lesbian with a feminine expression. There are a lot of different proposed flags yet none in predominant use, and the one included here was chosen for the best distinguishability of its colors.
 
+```{r otter}
+palette_lgbtq("otter")
+```
+
 ## Uncategorized
 
 All the terms that do not fit elsewhere. Currently empty.