back to notes

geom_sf & blank (not longitude or lattiude) background

```
foo_with_pop %>%
ggplot(aes(fill = foo_pop, color = foo_pop)) +
geom_sf() +
coord_sf(crs = 5070) +
scale_fill_viridis_c(option = "viridis", direction = -1) +
scale_colour_viridis_c(option = "viridis", direction = -1,
name="foo$/Population") +
#scale_fill_continuous(name="Experimental\nCondition") +
#labs(x = "", y = "") +
theme(legend.position = "bottom",
panel.background = element_rect(fill = "transparent"),
panel.grid.major = element_line(color = "transparent"),
axis.text.x = element_blank(),
axis.text.y = element_blank(),
axis.ticks = element_blank()) +
ggtitle("Fooitude / Population") +
ylab("Latitude Axis (Y Axis)")
```