Skip to content

Instantly share code, notes, and snippets.

@rafapereirabr

rafapereirabr/wordmap_cities.R

Last active May 2, 2019 23:14
Download ZIP

Revisions

  1. rafapereirabr renamed this gist Mar 15, 2019. 1 changed file with 0 additions and 0 deletions.
    0 figure.md → wordmap_cities_figure.md
    View file
    File renamed without changes.
  2. rafapereirabr revised this gist Mar 15, 2019. 1 changed file with 0 additions and 2 deletions.
    2 changes: 0 additions & 2 deletions wordmap_cities.R
    View file
    Original file line number Diff line number Diff line change
    @@ -1,8 +1,6 @@
    library(tidyverse)
    library(maps)

    data(world.cities)

    temp <- maps::world.cities %>%
    ggplot() +
    geom_point(aes(x=long, y=lat, size=pop, fill=pop, color=pop), alpha=.1, show.legend = FALSE) +
  3. rafapereirabr revised this gist Mar 15, 2019. 2 changed files with 1 addition and 2 deletions.
    1 change: 1 addition & 0 deletions figure.md
    View file
    Original file line number Diff line number Diff line change
    @@ -0,0 +1 @@
    ![pop](https://user-images.githubusercontent.com/7448421/54432810-fe1af200-4708-11e9-8cce-e4a4b072d4d8.png)
    2 changes: 0 additions & 2 deletions wordmap_cities.R
    View file
    Original file line number Diff line number Diff line change
    @@ -10,5 +10,3 @@ temp <- maps::world.cities %>%
    coord_equal()

    ggsave( temp, file="pop.png", dpi = 300, width = 20, height = 10)

    ![pop](https://user-images.githubusercontent.com/7448421/54432810-fe1af200-4708-11e9-8cce-e4a4b072d4d8.png)
  4. rafapereirabr revised this gist Mar 15, 2019. 1 changed file with 3 additions and 1 deletion.
    4 changes: 3 additions & 1 deletion wordmap_cities.R
    View file
    Original file line number Diff line number Diff line change
    @@ -9,4 +9,6 @@ temp <- maps::world.cities %>%
    theme_void() +
    coord_equal()

    ggsave( temp, file="pop.png", dpi = 300, width = 20, height = 10)
    ggsave( temp, file="pop.png", dpi = 300, width = 20, height = 10)

    ![pop](https://user-images.githubusercontent.com/7448421/54432810-fe1af200-4708-11e9-8cce-e4a4b072d4d8.png)
  5. rafapereirabr revised this gist Mar 15, 2019. 1 changed file with 1 addition and 4 deletions.
    5 changes: 1 addition & 4 deletions wordmap_cities.R
    View file
    Original file line number Diff line number Diff line change
    @@ -1,4 +1,3 @@

    library(tidyverse)
    library(maps)

    @@ -10,6 +9,4 @@ temp <- maps::world.cities %>%
    theme_void() +
    coord_equal()

    ggsave( temp, file="pop.png", dpi = 300, width = 20, height = 10)


    ggsave( temp, file="pop.png", dpi = 300, width = 20, height = 10)
  6. rafapereirabr revised this gist Mar 15, 2019. 1 changed file with 2 additions and 2 deletions.
    4 changes: 2 additions & 2 deletions wordmap_cities.R
    View file
    Original file line number Diff line number Diff line change
    @@ -1,4 +1,4 @@
    ```

    library(tidyverse)
    library(maps)

    @@ -12,4 +12,4 @@ temp <- maps::world.cities %>%

    ggsave( temp, file="pop.png", dpi = 300, width = 20, height = 10)

    ```

  7. rafapereirabr created this gist Mar 15, 2019.
    15 changes: 15 additions & 0 deletions wordmap_cities.R
    View file
    Original file line number Diff line number Diff line change
    @@ -0,0 +1,15 @@
    ```
    library(tidyverse)
    library(maps)

    data(world.cities)

    temp <- maps::world.cities %>%
    ggplot() +
    geom_point(aes(x=long, y=lat, size=pop, fill=pop, color=pop), alpha=.1, show.legend = FALSE) +
    theme_void() +
    coord_equal()

    ggsave( temp, file="pop.png", dpi = 300, width = 20, height = 10)

    ```