TIOBE redux

Exerting my will over the gist name

tiobe_redux_1.R

library(tidyverse)

df <- "zz_multiTimeline.csv" %>% 
  read_csv(
    skip = 2, # WTF google?!?,
    na = "<1",
    col_types = cols(
      Month = col_date(format = "%Y-%m"),
      .default = col_double()
    )
  ) %>% 
  pivot_longer(cols = -Month) %>% 
  rename(month = Month, search_term = name)

df <- df %>%
  mutate_at("search_term", ~ str_replace(.x, fixed(": (Worldwide)"), "")) %>% 
  mutate_at("search_term", ~ fct_reorder2(.x, month, value))

myplot <- function(df) {
  ggplot(df, aes(x = month, y = value, colour = search_term)) +
  geom_line() +
  theme(legend.justification=c(0,1), legend.position=c(0,1))
}

p <- myplot(df)
print(p)
ggsave("tiobe-redux.png", p)

p2 <- df %>% 
  filter(str_detect(search_term, "statistical|tidyverse")) %>% 
  myplot()
print(p2)
ggsave("tiobe-redux-statistical-only.png", p2)

zz_multiTimeline.csv

Category: All categories

Month,r programming: (Worldwide),r statistical programming: (Worldwide),tidyverse: (Worldwide),python programming: (Worldwide),python statistical programming: (Worldwide)
2004-01,6,0,0,49,0
2004-02,8,2,0,61,0
2004-03,4,0,0,43,0
2004-04,8,0,0,45,0
2004-05,8,2,0,45,0
2004-06,8,0,0,51,0
2004-07,5,0,0,41,0
2004-08,6,0,0,50,0
2004-09,7,3,0,52,2
2004-10,7,2,0,58,0
2004-11,10,2,0,50,0
2004-12,5,0,0,47,0
2005-01,8,0,0,47,0
2005-02,9,1,0,47,0
2005-03,8,1,0,55,0
2005-04,7,0,0,40,0
2005-05,7,0,0,52,0
2005-06,8,1,0,53,0
2005-07,7,0,0,48,1
2005-08,6,0,0,42,0
2005-09,11,1,0,41,0
2005-10,6,0,0,46,0
2005-11,8,1,0,40,0
2005-12,5,1,0,46,0
2006-01,6,1,0,44,0
2006-02,7,0,0,36,1
2006-03,5,1,0,41,0
2006-04,6,0,0,39,0
2006-05,7,1,0,36,0
2006-06,7,0,0,39,0
2006-07,5,1,0,33,0
2006-08,6,1,0,36,0
2006-09,5,1,0,36,0
2006-10,7,1,0,43,0
2006-11,8,1,0,36,0
2006-12,8,1,0,35,0
2007-01,5,1,0,35,0
2007-02,6,1,0,34,0
2007-03,9,1,0,33,0
2007-04,5,0,0,35,0
2007-05,8,1,0,38,0
2007-06,6,<1,0,30,0
2007-07,6,1,0,34,0
2007-08,6,<1,0,34,0
2007-09,6,1,0,37,0
2007-10,7,1,0,34,<1
2007-11,7,<1,0,35,0
2007-12,5,1,0,35,<1
2008-01,7,1,0,34,0
2008-02,7,1,0,34,0
2008-03,6,1,0,34,0
2008-04,8,<1,0,37,0
2008-05,6,0,0,36,<1
2008-06,8,1,0,36,0
2008-07,6,1,0,36,0
2008-08,6,<1,0,36,0
2008-09,7,<1,0,32,0
2008-10,6,<1,0,35,0
2008-11,6,<1,0,31,0
2008-12,6,1,0,35,0
2009-01,15,1,0,35,1
2009-02,8,1,0,33,0
2009-03,9,<1,0,36,0
2009-04,8,1,0,35,0
2009-05,6,<1,0,32,0
2009-06,7,<1,0,33,<1
2009-07,9,<1,0,32,0
2009-08,8,<1,0,36,0
2009-09,8,1,0,37,0
2009-10,9,<1,0,34,0
2009-11,9,<1,0,35,0
2009-12,8,1,0,33,0
2010-01,7,<1,0,32,<1
2010-02,10,1,0,35,0
2010-03,10,<1,0,35,0
2010-04,8,<1,0,34,0
2010-05,7,1,0,37,<1
2010-06,8,<1,0,32,0
2010-07,8,1,0,33,<1
2010-08,8,<1,0,34,0
2010-09,9,1,0,33,<1
2010-10,10,<1,0,35,<1
2010-11,9,1,0,35,<1
2010-12,9,0,0,36,<1
2011-01,9,<1,0,40,<1
2011-02,10,1,0,42,0
2011-03,9,<1,0,38,0
2011-04,8,<1,0,34,0
2011-05,7,<1,0,34,0
2011-06,9,<1,0,35,0
2011-07,8,<1,0,36,0
2011-08,10,<1,0,36,<1
2011-09,11,1,0,35,0
2011-10,11,<1,0,37,0
2011-11,11,<1,0,33,<1
2011-12,9,<1,0,32,<1
2012-01,12,<1,0,36,<1
2012-02,14,<1,0,40,0
2012-03,12,<1,0,39,0
2012-04,12,<1,0,40,<1
2012-05,12,<1,0,39,<1
2012-06,10,<1,0,38,<1
2012-07,10,<1,0,41,0
2012-08,12,1,0,43,0
2012-09,14,<1,0,45,0
2012-10,13,1,0,48,0
2012-11,13,1,0,41,0
2012-12,14,<1,0,40,0
2013-01,16,1,0,45,<1
2013-02,14,<1,0,48,0
2013-03,13,<1,0,49,<1
2013-04,14,<1,0,49,0
2013-05,12,<1,0,46,<1
2013-06,13,<1,0,47,<1
2013-07,13,<1,0,48,0
2013-08,12,1,0,46,<1
2013-09,17,<1,0,51,0
2013-10,17,<1,0,52,0
2013-11,16,1,0,48,<1
2013-12,14,1,0,47,<1
2014-01,18,<1,0,52,0
2014-02,18,<1,0,53,<1
2014-03,18,<1,0,53,<1
2014-04,20,1,0,51,<1
2014-05,22,1,0,50,<1
2014-06,23,1,0,50,<1
2014-07,24,<1,0,52,<1
2014-08,24,1,0,52,<1
2014-09,27,1,0,61,<1
2014-10,27,1,0,58,0
2014-11,25,1,0,57,0
2014-12,26,1,0,55,<1
2015-01,31,1,0,56,<1
2015-02,32,1,0,62,<1
2015-03,31,1,0,59,<1
2015-04,32,<1,0,58,<1
2015-05,31,1,0,58,<1
2015-06,32,1,0,66,<1
2015-07,33,1,0,64,<1
2015-08,33,1,0,66,<1
2015-09,35,1,0,74,<1
2015-10,33,1,0,68,<1
2015-11,29,1,0,69,<1
2015-12,28,1,0,70,<1
2016-01,29,1,0,62,<1
2016-02,31,1,0,62,<1
2016-03,31,1,0,67,<1
2016-04,31,1,0,62,<1
2016-05,28,1,0,57,<1
2016-06,28,<1,0,62,<1
2016-07,26,1,<1,59,<1
2016-08,29,1,<1,62,<1
2016-09,32,1,1,64,<1
2016-10,30,1,1,67,<1
2016-11,29,1,1,66,<1
2016-12,30,1,1,65,<1
2017-01,33,1,1,74,<1
2017-02,33,1,2,77,<1
2017-03,34,1,2,80,<1
2017-04,31,<1,2,76,<1
2017-05,31,1,2,75,<1
2017-06,31,1,3,73,<1
2017-07,33,1,3,71,<1
2017-08,32,1,4,80,<1
2017-09,36,1,5,91,<1
2017-10,36,1,4,89,<1
2017-11,36,<1,6,94,<1
2017-12,33,<1,4,89,<1
2018-01,34,1,6,93,<1
2018-02,38,1,8,91,<1
2018-03,33,1,8,86,<1
2018-04,30,<1,8,85,<1
2018-05,30,<1,7,81,<1
2018-06,30,<1,8,85,<1
2018-07,31,<1,7,82,<1
2018-08,31,1,7,91,<1
2018-09,34,1,8,91,<1
2018-10,31,<1,10,87,<1
2018-11,28,<1,9,83,<1
2018-12,26,<1,7,77,<1
2019-01,31,1,10,83,<1
2019-02,31,<1,12,88,<1
2019-03,29,1,10,85,<1
2019-04,29,<1,11,81,<1
2019-05,27,<1,11,83,<1
2019-06,26,<1,11,90,<1
2019-07,30,1,11,100,<1
2019-08,28,<1,11,96,<1