Log In Sign Up
Models:
Alyssa Salazar
AlyssaS/
UCSCXenaTools
0
Downloads: 1
Diff of /inst/queries/datasetProbeSignature.xq [000000] .. [0bdad5]

Switch to unified view

a b/inst/queries/datasetProbeSignature.xq 

  1
  
;datasetProbeSignature





  
  

  2
  
(fn [dataset samples probes weights]





  
  

  3
  
 (let [vals (fetch [{:table dataset





  
  

  4
  
                     :samples samples





  
  

  5
  
                     :columns probes}])]





  
  

  6
  
     (apply + (map (fn [w v] (* v w)) weights vals))))