Skip to content
Permalink
master
Switch branches/tags
Go to file
 
 
Cannot retrieve contributors at this time
35 lines (25 sloc) 830 Bytes
#
# ETP-API-KM.R, 22 Mar 20
#
# Data from:
# Co-evolution of the {Eclipse} Framework and its Third-party Plug-ins
# John Businge
#
# Example from:
# Evidence-based Software Engineering: based on the publicly available data
# Derek M. Jones
#
# TAG Eclipse_plugin plugin_survival 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,
xaxs="i", yaxs="i",
xlim=c(0,7),
xlab="Years", ylab="Survival\n")