Pontifications
read_csv
is better because it doesn’t require any arguments and it’s faster
- code from Tim Smith, thanks Tim!
os_tags <-
read_csv("https://raw.githubusercontent.com/rtanglao/rt-kitsune-api/master/FF62_WEEK1/16september2018-tags-5-11september2018.csv") %>%
filter(
grepl("^windows-", tag) |
(tag == "mac-os") |
(tag == "linux")) %>%
mutate(os=ifelse(grepl("^windows-", tag), "windows", tag))
os_tags_with_counts <-
os_tags %>%
group_by(os) %>%
count()
os_plot <-
ggplot(data=os_tags_with_counts, aes(x=os,y=n))
os_plot = os_plot + geom_bar(stat="identity")
graph with just operating systems
Leave a comment on github