[test_mcq_plot_peptide_sharing] test unitaire ok

test/test_mcq_plot_peptide_sharing.R

 library("MassChroqR")
 packageVersion("MassChroqR")
-
 cat(paste(Sys.time(),"\n",sep =""))
 
+local_tests=TRUE
+
 source ("./data_sample_for_tests_v1.R")
 
 dir.create("/tmp/test_MassChroqR", showWarnings = FALSE)
@@ -35,7 +36,7 @@ if (file.exists("protpep.RData")) {
 mcq.plot.peptide.sharing(protPep, file="PeptideSharing.pdf")
 
 cat ("*********************************************\n")
-cat (" mcq.plot.peptide.reproducibility OK\n")
+cat (" mcq.plot.peptide.sharing OK\n")
 cat ("*********************************************\n")
 
 

test_results/test_mcq_plot_peptide_sharing.out

 [1] ‘0.3.8’
-2017-01-27 15:17:43
+2017-12-27 12:00:05
 *********************************************
  test mcq plot peptide sharing functions 
 *********************************************
-Checking validity
-mcqProtPep object is valid
-Checking mcqMetadata validity
-mcqMetadata object is valid
 null device 
           1 
 *********************************************
- mcq.plot.peptide.reproducibility OK
+ mcq.plot.peptide.sharing OK
 *********************************************