moved TPR and FPR calculations to R script