Permalink
Cannot retrieve contributors at this time
| # | |
| # effort-bidprice.R, 3 Oct 19 | |
| # | |
| # Data from: | |
| # Variability and Reproducibility in Software Engineering: A Study of Four Companies that Developed the Same System | |
| # Bente C. D. Anda and Dag I. K. Sj{\o}berg and Audris Mockus | |
| # | |
| # Example from: | |
| # Evidence-based Software Engineering: based on the publicly available data | |
| # Derek M. Jones | |
| # | |
| # TAG experiment_people estimate_variability tender_bid | |
| source("ESEUR_config.r") | |
| bid_info=read.csv(paste0(ESEUR_dir, "projects/SoftEngjan10.csv.xz"), as.is=TRUE) | |
| # Consistency check | |
| # (bid_info$A_D_bid+bid_info$A_D_planned/10) == bid_info$A_D_emphasis | |
| plot(bid_info$bid_price, bid_info$est_time, col=point_col, lwd=1.4, | |
| xlab="Amount quoted", ylab="Estimated time\n") | |
| bid_mod=glm(est_time ~ bid_price, data=bid_info) | |
| sub_info=subset(bid_info, bid_price < 50000) | |
| # sub_mod=glm(est_time ~ (bid_price+A_D_bid+A_D_planned+A_D_emphasis)^2, data=sub_info) | |
| # t=stepAIC(sub_mod) | |
| sub_mod=glm(est_time ~ bid_price + A_D_bid + A_D_planned + | |
| + bid_price:(A_D_bid + A_D_planned) | |
| # + A_D_planned:(A_D_bid + A_D_emphasis) | |
| # Given the relationship between these three variables, | |
| # we can simplify: | |
| + A_D_planned:A_D_bid | |
| + I(A_D_planned^2) | |
| , data=sub_info) | |
| summary(sub_mod) | |