Open chandryou opened 6 years ago
@schuemie , In comparison study skeleton, generateDiagnostics function `if (sum(!is.na(controlSubset$seLogRr)) >= 5) { fileName <- file.path(diagnosticsFolder, paste0("trueAndObs_a", analysisId, "_t", targetId, "c", comparatorId, "", label, ".png"))
try( EmpiricalCalibration::plotTrueAndObserved(logRr = controlSubset$logRr, seLogRr = controlSubset$seLogRr, trueLogRr = log(controlSubset$targetEffectSize), fileName = fileName) ) }`
In the controlSubset doesn't have targetEffectSize, so EmpiricalCalibration::plotTrueAndObserved doesn't work
@schuemie , In comparison study skeleton, generateDiagnostics function `if (sum(!is.na(controlSubset$seLogRr)) >= 5) { fileName <- file.path(diagnosticsFolder, paste0("trueAndObs_a", analysisId, "_t", targetId, "c", comparatorId, "", label, ".png"))
controlSubset doesn't have targetEffectSize
In the controlSubset doesn't have targetEffectSize, so EmpiricalCalibration::plotTrueAndObserved doesn't work