; datasetGeneProbesValues
(fn [dataset samples genes]
	(let [probemap (:probemap (car (query {:select [:probemap]
										   :from [:dataset]
										   :where [:= :name dataset]})))
			position (xena-query {:select ["name" "position"] :from [probemap] :where [:in :any "genes" genes]})
			probes (position "name")]
	  [position
		(fetch [{:table dataset
				 :samples samples
				 :columns probes}])]))