Skip to content

Commit

Permalink
comorbidities, sample size (#9)
Browse files Browse the repository at this point in the history
aostropolets authored Oct 1, 2023

Verified

This commit was created on GitHub.com and signed with GitHub’s verified signature. The key has expired.
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.