Permalink
Switch branches/tags
Nothing to show
Find file Copy path
Fetching contributors…
Cannot retrieve contributors at this time
32 lines (23 sloc) 791 Bytes
#
# ETP-API-KM.R, 26 Oct 18
#
# Data from:
# Survival of Eclipse Third-party Plug-ins
# John Businge and Alexander Serebrenik and Mark van den Brand
#
# Example from:
# Evidence-based Software Engineering: based on the publicly available data
# Derek M. Jones
#
# TAG Eclipse plugin API survival
source("ESEUR_config.r")
library("survival")
pal_col=rainbow(2)
all_API=read.csv(paste0(ESEUR_dir, "survival/ETP/ETP-all-rel.csv.xz"), as.is=TRUE)
# Technically, this is interval censored data (we don't have an exact time
# for when the release occured, only end of year counts).
api_surv=Surv(all_API$year_end-all_API$year_start,
event=all_API$survived == 0, type="right")
api_mod=survfit(api_surv ~ all_API$API)
plot(api_mod, col=pal_col, conf.int=TRUE,
xlim=c(0,7), xlab="Years")