Permalink
Cannot retrieve contributors at this time
| # | |
| # 2011-TR-bpm.R, 20 May 20 | |
| # | |
| # Data from: | |
| # An Empirical Study on Consistency Management of Business and {IT} Process Models | |
| # Mois{\'e}s Castelo Branco and Yingfei Xiong and Krzysztof Czarnecki and Jochen K{\"u}ster and Hagen V{\"o}lzer | |
| # | |
| # Example from: | |
| # Evidence-based Software Engineering: based on the publicly available data | |
| # Derek M. Jones | |
| # | |
| # TAG business_change-request | |
| source("ESEUR_config.r") | |
| pal_col=rainbow(4) | |
| P1=read.csv(paste0(ESEUR_dir, "ecosystems/P1_Change_Requests.tsv.xz"), sep="\t", as.is=TRUE) | |
| P1$MONTH=as.Date(paste0("01-", P1$MONTH), format="%d-%b/%Y") | |
| ybounds=c(0, max(P1$NONE)) | |
| plot_change=function(kind, col_num) | |
| { | |
| lines(P1$MONTH, kind, type="l", col=pal_col[col_num]) | |
| } | |
| plot(P1$MONTH, P1$NONE, type="n", | |
| xaxs="i", yaxs="i", | |
| ylim=ybounds, | |
| xlab="Date", ylab="Changes\n") | |
| plot_change(P1$NONE, 1) | |
| plot_change(P1$BPEL, 2) | |
| plot_change(P1$BOTH, 3) | |
| plot_change(P1$BPMN, 4) | |
| legend(x="topright", legend=c("Neither", "IT only", "Business/IT", "Business only"), | |
| bty="n", fill=pal_col, cex=1.2) | |