Commit 5b71b75a authored by eboulanger's avatar eboulanger
Browse files

feature 1bis script 3

parent fce3f8ad
...@@ -5,6 +5,7 @@ library(tidyr) ...@@ -5,6 +5,7 @@ library(tidyr)
# Features: # Features:
# 1) Change colors of birds names to the color of the line # 1) Change colors of birds names to the color of the line
# 1 bis) pretty legend
# 2) Change point shape to triangle # 2) Change point shape to triangle
# Import data # Import data
...@@ -74,7 +75,8 @@ ggplot(ranked, aes(x=date, y=rank)) + ...@@ -74,7 +75,8 @@ ggplot(ranked, aes(x=date, y=rank)) +
subtitle = "Daily Progression of Top 10 Rankings", subtitle = "Daily Progression of Top 10 Rankings",
y = "", x = "Voting Period", y = "", x = "Voting Period",
color = "Bird Breed") + color = "Bird Breed") +
theme(panel.background=element_rect(fill = NA), axis.ticks.y = element_line(size = NA)) theme(legend.key = element_rect(fill = NA),
panel.background=element_rect(fill = NA), axis.ticks.y = element_line(size = NA))
# Save # Save
ggsave('plots/script3_EB.png', width=10, height=8) ggsave('plots/script3_EB.png', width=10, height=8)
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment