Closed mdlavallee92 closed 2 months ago
clinChar <- makeClinChar( targetCohortIds = 2, targetCohortNames = "Obesity", dbms = "redshift", cdmDatabaseSchema = executionSettings$cdmDatabaseSchema, workDatabaseSchema = executionSettings$workDatabaseSchema, cohortTable = executionSettings$cohortTable ) |> addAgeChar(categorize = age10yrGrp()) |> addGenderChar() |> addRaceChar() |> addYearChar(categorize = year5yrGrp()) |> #addLocationChar(locationTable = makeLocationTable(connection, cdmDatabaseSchema = executionSettings$cdmDatabaseSchema)) |> addConditionPresence( conceptSets = charlsonConcepts(), timeWindows = makeTimeTable(time_a = -365, time_b = -1), limit = "first", score = charlsonIndexScore(ageId = 1) ) |> addConditionPresence( conceptSets = otherCondConcepts, timeWindows = makeTimeTable(time_a = -730, time_b = -1), limit = "first" )
closing to address in v1