fix legend in chart

worldbank · Dec 9, 2024 · e451617 · e451617
1 parent fed4d4b
commit e451617
Showing 1 changed file with 5 additions and 3 deletions.
diff --git a/vignettes/articles/get-gd-example.Rmd b/vignettes/articles/get-gd-example.Rmd
@@ -95,7 +95,7 @@ get_gd(
   cum_population = datt_rural$p,
   estimate = "lorenz",
   lorenz = "lb",
-  n_bins = 100,
+  n_bins = 10,
   server = "dev"
 )
 ```
@@ -155,10 +155,12 @@ ggplot(poverty_stats, aes(x = poverty_line)) +
   labs(
     title = "Poverty Measures vs. Poverty Line, Rural India 1983",
     x = "Poverty Line",
-    y = "Measure Value",
+    y = "Poverty Measure (FGT indices)",
     color = "Poverty Measure"
   ) +
-  theme_minimal()
+  theme_minimal() +
+  theme(legend.position = "bottom", 
+        legend.title = element_blank())
 ```
 
 ### Lorenz Curve Data