Permalink
Switch branches/tags
Nothing to show
Find file Copy path
Fetching contributors…
Cannot retrieve contributors at this time
32 lines (22 sloc) 808 Bytes
#
# simula_04.R, 29 Aug 16
#
# Data from:
# Eliminating Over-Confidence in Software Development Effort Estimates
# Magne J{\o}rgensen and Kjetil Mol{\o}kken
#
# Example from:
# Evidence-based Software Engineering: based on the publicly available data
# Derek M. Jones
#
# TAG estimate-effort overconfidence project
source("ESEUR_config.r")
pal_col=rainbow(2)
# Team,Group,Estimate,Minimum,Maximum
est=read.csv(paste0(ESEUR_dir, "group-compare/simula_04.csv.xz"), as.is=TRUE)
plot(density(subset(est, Group =="A")$Estimate), col=pal_col[1],
main="",
xlim=range(est$Estimate), ylim=c(0, 9e-4),
xlab="Estimate", ylab="Density\n")
lines(density(subset(est, Group !="A")$Estimate), col=pal_col[2])
legend(x="topright", legend=c("No instructions", "With instructions"), bty="n", fill=pal_col, cex=1.2)