OHDSI / StudyProtocolSandbox

This repository is for developing study packages for OHDSI studies. Once completed, they can be moved to the StudyProtocols repository.
32 stars 40 forks source link

In comparison study skeleton #23

Open chandryou opened 6 years ago

chandryou commented 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"))

controlSubset doesn't have targetEffectSize

    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