Ecosyste.ms: Awesome
An open API service indexing awesome lists of open source software.
https://github.com/JuanmaMN/tidyverse-ggplot2
Publish ggplot2 analysis
https://github.com/JuanmaMN/tidyverse-ggplot2
barchart dumbbell ggplot2 ggplot2-analysis tidyverse-ggplot2 waffle
Last synced: 16 days ago
JSON representation
Publish ggplot2 analysis
- Host: GitHub
- URL: https://github.com/JuanmaMN/tidyverse-ggplot2
- Owner: JuanmaMN
- Created: 2019-08-15T18:57:31.000Z (about 5 years ago)
- Default Branch: master
- Last Pushed: 2024-09-14T17:49:26.000Z (about 2 months ago)
- Last Synced: 2024-09-15T03:25:43.560Z (about 2 months ago)
- Topics: barchart, dumbbell, ggplot2, ggplot2-analysis, tidyverse-ggplot2, waffle
- Language: HTML
- Homepage:
- Size: 1.11 MB
- Stars: 15
- Watchers: 2
- Forks: 1
- Open Issues: 0
-
Metadata Files:
- Readme: README.md
Awesome Lists containing this project
README
# tidyverse-ggplot2
Code for all the ggplot2 analyses done and published.
## **geom_segment & geom_rrect**
FIFA World Cup 2022
## **geom_segment**
**Ggplot2 chart using geom_segment.** Code is available [here](https://github.com/JuanmaMN/tidyverse-ggplot2/blob/master/geom_segment/geom_segment_TidyTuesday_31_5_2021.R)
Contribution to #TidyTuesday - 31st May 2021
## **geom_text**
**Ggplot2 chart using geom_segment.** Code is available [here](https://github.com/JuanmaMN/TidyTuesday/blob/master/2023/April/TidyTuesday_25th_April_2023)
Contribution to #TidyTuesday - 25th April 2023
## **geom_point**
**Ggplot2 chart using geom_point.** Code is available [here](https://github.com/JuanmaMN/TidyTuesday/blob/master/2022/March/TidyTuesday_29th_March_2022.R)
Contribution to #TidyTuesday - 29th March 2022
## **Quasi-Random chart**
**Ggplot2 chart using geom_quasirandom.** Code is available [here](https://github.com/JuanmaMN/tidyverse-ggplot2/blob/master/geom_quasirandom/geom_quasirandom%20-%20TidyTuesday%20-%209-3-2021.R)
## **Bar chart**
**Ggplot chart using geom_bar.** Code is available [here](https://github.com/JuanmaMN/tidyverse-ggplot2/blob/master/geom_bar/geom_bar%20-%20TidyTuesday%203-3-2020.R)
## **geom_bar - facet_wrap**
**Ggplot2 chart using geom_bar and facet_wrap.** Code is available [here](https://github.com/JuanmaMN/tidyverse-ggplot2/blob/master/geom_bar/geom_bar%20-%20facet_wrap%20-%20TidyTuesday%2014-1-2020.R)
## **Dumbbell**
**Ggplot2 chart using geom_dumbbell.** Code is available [here](https://github.com/JuanmaMN/TidyTuesday/blob/master/2021/May/TidyTuesday_25_5_2021.R)
**Ggplot2 chart using geom_dumbbell.** Code is available [here](https://github.com/JuanmaMN/tidyverse-ggplot2/blob/master/geom_dumbbell/geom_dumbbell%20-%20TidyTuesday%2014-10-2019.R)
**Multi-point “dumbbell” plot with ggplot2.** Code is available [here](https://github.com/JuanmaMN/tidyverse-ggplot2/blob/master/geom_dumbbell/Multi-point%20%E2%80%9Cdumbbell%E2%80%9D%20Plots%20in%20ggplot2.R)
**Multi-point “dumbbell” plot with ggplot2.** Code is available [here](https://github.com/JuanmaMN/tidyverse-ggplot2/blob/master/geom_dumbbell/Multi-point%20dumbbel%20-%20TidyTuesday%20-%2023-2-2021.R)
**Multi-point “dumbbell” plot with ggplot2 and point difference.** Code is available [here](https://github.com/JuanmaMN/tidyverse-ggplot2/blob/master/geom_dumbbell/Multi-point%20dumbbell%20with%20difference%20-%20Rugby%20World%20Cup%202019%20-%202-11-2019.R)
## **Ridgeline**
Code is available [here](https://github.com/JuanmaMN/tidyverse-ggplot2/blob/master/geom_density_ridges/Life%20Expectancy%2012.7.2019/Life%20Expectancy%20-%20Two%20plots.R)
ggplot(Life_Expectancy_Gender_gather_join_2016, aes(x=Life_Expectancy,
y = reorder(Continent,desc(Continent)),
fill = Gender, group = interaction(Continent, Gender)),width=800, height=700) +
geom_density_ridges() +
theme_ipsum_rc()+
labs(
caption = "\n Source:World Bank | https://data.worldbank.org/
Visualization: JuanmaMN (Twitter @Juanma_MN)",
x = "Life Expectancy",
y = "") ...
## **Area graph**
Code is available [here](https://github.com/JuanmaMN/tidyverse-ggplot2/blob/master/geom_area/geom_area%20-%20Education%20analysis%20by%20Gender.R)
## **Multi-area graph**
Code is available [here](https://github.com/JuanmaMN/TidyTuesday/blob/master/2023/March/TidyTuesday_14th_March_2023)
## **Waffle graph**
Code is available [here](https://github.com/JuanmaMN/tidyverse-ggplot2/blob/master/geom_waffle/geom_waffle%20-%20TidyTuesday%2022-10-2019.R)
ggplot(waffle, aes(fill = Review_Rating, values = n)) +
geom_waffle(color = "white", size = .25, n_rows = 10, flip = T) +
facet_wrap(~Year, nrow = 1, strip.position = "bottom") + ...
## **Heatmap with geom_tile**
Code is available [here](https://github.com/JuanmaMN/tidyverse-ggplot2/blob/master/geom_tile/geom_tile%20-%20TidyTuesday%2018-11-2019.R)
**TidyTuesday Week 23/2023 - Energy**
Code is available [here](https://github.com/JuanmaMN/TidyTuesday/blob/master/2023/June/TidyTuesday_6th_June_2023).
## **Animated ggplot with gganimate**
Code is available [here](https://github.com/JuanmaMN/tidyverse-ggplot2/blob/master/gganimate/gganimate%20-%20GNI%20-%20Github.R)
## **geom_bar_text**
Code is available [here](https://github.com/JuanmaMN/tidyverse-ggplot2/blob/master/geom_bar_text/geom_bar_text%20%20-%20TidyTuesday%207-1-2020.R)
## **geom_bar_text + geom_flag**
Code is available [here](https://github.com/JuanmaMN/tidyverse-ggplot2/blob/master/geom_bar_text/geom_bar_text%20-%20geom_flag%20-%2013-1-2020.R)
ggplothp<-data_2019 %>% ggplot(aes(x=fct_reorder(Country,Happiness_Score), y=Happiness_Score,
group = Country, fill= factor(Country))) +
geom_col(width = 0.8) +
geom_bar_text(place = "right", contrast = TRUE, size=10,
aes(label=paste0(Country, " ",round(Happiness_Score,3)))) + ...
## **geom_chicklet**
Code is available [here](https://github.com/JuanmaMN/tidyverse-ggplot2/blob/master/geom_chicklet/geom_chicklet%20-%20TidyTuesday%2010-2-2020.R)
plot_hotel<-ggplot(hotels_data, aes(x = arrival_date_month, y = prop, fill = hotel)) +
geom_chicklet() +
coord_flip() +
theme_minimal() +
scale_fill_manual(values = c("#add8e6", "#20b2aa")) + ...
## **geom_bump**
Code is available [here](https://github.com/JuanmaMN/tidyverse-ggplot2/blob/master/geom_bump/geom_bump%20-%201-3-2020.R)
ggplot(data3, aes(Year, rank, color = Country)) +
geom_point(size = 7) +
geom_text(data = data3 %>% filter(Year == min(Year)),
aes(x = Year - .1, label = Country), size = 4, hjust = 1) +
geom_text(data = data3 %>% filter(Year == max(Year)),
aes(x = Year + .1, label = Country), size = 4, hjust = 0) +
geom_bump(aes(smooth = 6), size = 1.5) + ...
## **Line chart**
Code is available [here](https://github.com/JuanmaMN/tidyverse-ggplot2/blob/master/geom_line/geom_line%20-%20TidyTuesday%20-%2027-4-2020.R)
g2<-grosses2 %>%
ggplot(aes(month,total_seats_sold, group=year, col=factor(year))) +
geom_line(size=1.5,linetype = "solid") +
geom_point(size=4, shape=21, fill="#f0f0f0") ...
## **Map**
Code is available [here](https://github.com/JuanmaMN/tidyverse-ggplot2/blob/master/map/plot_usmap%20-%20TidyTuesday%2030-3-2020.R)
p<-plot_usmap(data = data2, values = "value", labels = TRUE, lines = "white",
label_color = "white") ...
Code is available [here](https://github.com/JuanmaMN/tidyverse-ggplot2/blob/master/map/geom_polygon%20-%20TidyTuesday%20-%2020-4-2020.R)
europe2 <- europe + geom_polygon(data = map,
aes(fill = fine,x = long,
y = lat, group = group),
color = "grey70") ...
Code is available [here](https://github.com/JuanmaMN/tidyverse-ggplot2/blob/master/map/geom_map%20-%20TidyTuesday%2011-5-2020.R)
pA <- ggplot() +
geom_map(data = world, map = world,
aes(long, lat, group = group, map_id = region),
fill = "#282828", color = "#282828") +
geom_map(data = databerup, map = world,
aes(fill = total, map_id = country),
color = "#282828", size = 0.15, alpha = .8) ...
**geom_statebins**
Code is available [here](https://github.com/JuanmaMN/TidyTuesday/blob/master/2021/April/TidyTuesday_17_4_2021.R)
## **Donut chart**
Code is available [here](https://github.com/JuanmaMN/tidyverse-ggplot2/blob/master/geom_rect/geom_rect%20-%20TidyTuesday%2023-6-2020.R)
Code is available [here](https://github.com/JuanmaMN/tidyverse-ggplot2/blob/master/ggplot2%20with%20patchwork/patchwork%20-%20TidyTuesday%20-%208-6-2020.R).
Contribution to #TidyTuesday - 8th June 2020
