Skip to content
Permalink
master
Switch branches/tags
Go to file
 
 
Cannot retrieve contributors at this time
52 lines (39 sloc) 1.29 KB
#
# putnam-MTTF-lin.R, 4 Nov 20
#
# Data from:
# Measures for Excellence: Reliable software on time, within budget
# Lawrence H. Putnam and Ware Myers
# extracted from figure 8.3
#
# Example from:
# Evidence-based Software Engineering: based on the publicly available data
# Derek M. Jones
#
# TAG failure_mean-time
source("ESEUR_config.r")
plot_layout(1, 2, default_height=16)
par(mar=MAR_default-c(0.0, -1.1, 0.0, 1.0))
MTTF=read.csv(paste0(ESEUR_dir, "regression//putnam-MTTF.csv.xz"), as.is=TRUE)
# A fake plot designed to shift the others two plots right
fake_plot=function()
{
plot(0, bty="n", type="n",
xaxt="n", yaxt="n",
xlim=c(1, 2), ylim=c(1, 2),
xlab="", ylab="")
text(1, 1, ".", cex=0.1)
}
# Stuff to temporarily fix a book layout issue
# fake_plot()
# fake_plot()
# mtext(text="Mean Time to Fail (days)\n", side=4, las=0, cex=0.8)
#
# par(mar=MAR_default-c(0.0, 2.6, 0.0, 1.0))
plot(MTTF, log="x", col=point_col, cex=1.7, cex.axis=2.6, cex.lab=2.3,
xlab="", ylab="Mean Time to Fail (days)\n")
# axis(1, at=c(2, 5, 20, 50, 500), cex.lab=2)
mtext(text="Effective Source KLOC", side=1, las=0, cex=1.4, padj=1.8)
plot(MTTF, log="xy", col=point_col, cex=1.7, cex.axis=2.6, cex.lab=2.3,
xlab="", ylab="")
mtext(text="Effective Source KLOC", side=1, las=0, cex=1.4, padj=1.8)