diff --git a/server.R b/server.R
index d513a7b..02955ed 100644
--- a/server.R
+++ b/server.R
@@ -14,7 +14,8 @@ shinyServer(function(input, output) {
   #LH: this function should take a vector of p-values and 
   # spit out a FDR
   # "calcFDR"
-  
+  source("calfdr.R")
+  fdrdata <- calFDR(df)
   
   
   #LH: output a plot here