source("MCanalysisNPI-latter-plot-PIRAT.R")
./clean-up.sh 
q()
means*1000
means*1000
q()
a
490/500
480/500
461/500
294/500
392/500
392+93
92/500
186/500
q()
