fix call to recall precision curve script

etc/docker/r_basics/Dockerfile

@@ -2,7 +2,7 @@ FROM r-base
 
 MAINTAINER Carine Rey carine.rey@ens-lyon.org
 
-RUN echo 'install.packages(c("optparse", "ggplot2", "reshape2", "cowplot", "coda"), repos="https://mirror.ibcp.fr/pub/CRAN/", dependencies=TRUE)' > /tmp/packages.R \
+RUN echo 'install.packages(c("PRROC","optparse", "ggplot2", "reshape2", "cowplot", "coda"), repos="https://mirror.ibcp.fr/pub/CRAN/", dependencies=TRUE)' > /tmp/packages.R \
 && Rscript /tmp/packages.R
 
 RUN apt-get update && \

lib/convergence_detection.ml

@@ -177,7 +177,7 @@ let plot_convergent_sites ?(plot_all_sites = true) ~alignment ~detection_results
 
 let recall_precision_curve table =
   Workflow.shell ~descr:"recall_precision_curve" [
-    cmd "Rscript" [
+    cmd "Rscript" ~img:Env.env_r [
       file_dump (string Scripts.recall_precision_curve) ;
       dep table ;
       dest ;

lib/scripts/recall_precision_curve.R

@@ -62,7 +62,6 @@ main <- function(fn, dest) {
   svg(dest)
   print(plot_recall_precision)
   dev.off()
-  saveRDS(list(dd, d), "/home/pveber/rien.rds")
 }
 
 main(args[1], args[2])