--- a
+++ b/inst/queries/cohortSamples.xq
@@ -0,0 +1,11 @@
+; cohortSamples
+(fn [cohort limit]
+    (map :value
+      (query
+        {:select [:%distinct.value]
+         :from [:dataset]
+         :join [:field [:= :dataset.id :dataset_id]
+                :code [:= :field_id :field.id]]
+         :limit limit
+         :where [:and [:= :cohort cohort]
+                      [:= :field.name "sampleID"]]})))