Merge pull request #30 from OHDSI/cran_prep

cran prep

DESCRIPTION

@@ -1,11 +1,18 @@
 Package: phenotypeR
 Type: Package
-Title: Phenotype a set of cohorts in data mapped to a the OMOP common data model
+Title: Assess Study Cohorts Using a Common Data Model
 Version: 0.0.900
-Author: Who wrote it
-Maintainer: The package maintainer <[email protected]>
-Description: More about what it does (maybe more than one line)
-    Use four spaces when indenting paragraphs within the Description.
+Authors@R: c(
+    person("Edward", "Burn", , "[email protected]", 
+    role = c("aut", "cre"), comment = c(ORCID = "0000-0002-9286-1128")),
+    person("Marti", "Catala", , "[email protected]", 
+    role = c("aut"), comment = c(ORCID = "0000-0003-3308-9905")),
+    person("Xihang", "Chen", , "[email protected]", 
+    role = c("aut"), comment = c(ORCID = "0009-0001-8112-8959")),    
+    person("Albert", "Prats-Uribe", , "[email protected]", 
+    role = "aut", comment = c(ORCID = "0000-0003-1202-9153")))
+Description: Phenotype study cohorts in data mapped to the 
+    Observational Medical Outcomes Partnership Common Data Model.
 License: Apache License (>= 2)
 Encoding: UTF-8
 LazyData: true

R/codelistDiagnostics.R

@@ -8,6 +8,15 @@
 #' @export
 #'
 #' @examples
+#' \donttest{
+#' library(CohortConstructor)
+#'
+#' cdm <- mockCohortConstructor(conditionOccurrence = TRUE)
+#'
+#' cohort <- conceptCohort(cdm = cdm, conceptSet = list(a = 1), name = "cohort")
+#'
+#' cohort |> attrition()
+#' }
 codelistDiagnostics <- function(cohort){
 
   cdm <- omopgenerics::cdmReference(cohort)