Skip to content

Commit

Permalink
comorbidities, sample size (#9)
Browse files Browse the repository at this point in the history
  • Loading branch information
aostropolets authored Oct 1, 2023
1 parent ee42f28 commit 7d5cf59
Showing 1 changed file with 2 additions and 2 deletions.
4 changes: 2 additions & 2 deletions R/createKEEPER.R
Original file line number Diff line number Diff line change
@@ -303,7 +303,7 @@ createKEEPER <- function(connectionDetails = NULL,
DatabaseConnector::renderTranslateExecuteSql(
connection = connection,
sql = " DROP TABLE IF EXISTS #person_id_data;
SELECT DISTINCT subject_id
SELECT DISTINCT subject_id, cohort_start_date
INTO #person_id_data
FROM @cohort_database_schema.@cohort_table
WHERE cohort_definition_id = @cohort_definition_id;",
@@ -651,7 +651,7 @@ death = death%>%
dplyr::left_join(after_drugs, by = c("personId", "cohortStartDate", "cohortDefinitionId"))%>%
dplyr::left_join(after_treatment_procedures, by = c("personId", "cohortStartDate", "cohortDefinitionId"))%>%
dplyr::left_join(death, by = c("personId", "cohortStartDate", "cohortDefinitionId"))%>%
dplyr::select(personId, newId, age, gender, observation_period, visit_context, presentation, symptoms, prior_disease, prior_drugs, prior_treatment_procedures,
dplyr::select(personId, newId, age, gender, observation_period, visit_context, presentation, comorbidities, symptoms, prior_disease, prior_drugs, prior_treatment_procedures,
diagnostic_procedures, measurements, alternative_diagnosis, after_disease, after_treatment_procedures, after_drugs, death)%>%
dplyr::distinct()
# add columns for review

0 comments on commit 7d5cf59

Please sign in to comment.