Skip to content

Instantly share code, notes, and snippets.

@sAbakumoff

sAbakumoff/msg_len.R

Last active September 11, 2016 12:43
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save sAbakumoff/ed846af8b60ecf2f97cc3e1ef8abebb7 to your computer and use it in GitHub Desktop.
Save sAbakumoff/ed846af8b60ecf2f97cc3e1ef8abebb7 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
msg_len.R
library(dplyr)
library(stringr)
react_angular_commits<-read.csv("react_angular_commits.csv") %>%
mutate(message=str_replace_all(message, "\n", " "),
message_len=str_length(message),
name=str_sub(repo_name, start=regexpr('/', repo_name) + 1))
boxplot(message_len ~ name, react_angular_commits, outline=FALSE,
horizontal=TRUE, las=2,
col=c("#d20013", "#53d2fa"),
main="Length of the commits messages", par(mar=c(5,6,4,6)))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment