added savepl::Bool parameter to mpcac default false

src/juobs_obs.jl

@@ -92,7 +92,7 @@ m12 = mpcac(corr_a0p, corr_pp, [50, 60], pl=false, ca=ca)
 """
 function mpcac(a0p::Vector{uwreal}, pp::Vector{uwreal}, plat::Vector{Int64}; ca::Float64=0.0, pl::Bool=true, data::Bool=false, 
     kappa::Union{Vector{Float64}, Nothing}=nothing, mu::Union{Vector{Float64}, Nothing}=nothing, 
-    wpm::Union{Dict{Int64,Vector{Float64}},Dict{String,Vector{Float64}}, Nothing}=nothing)     
+    wpm::Union{Dict{Int64,Vector{Float64}},Dict{String,Vector{Float64}}, Nothing}=nothing, savepl::Bool = false)     
     
     corr_a0p = -a0p[1:end] 
     corr_pp = pp[1:end]
@@ -129,18 +129,21 @@ function mpcac(a0p::Vector{uwreal}, pp::Vector{uwreal}, plat::Vector{Int64}; ca:
         _, max_idx = findmax(value.(pp))
         ylim(v-20*e, v+20*e)
         xlim(left=max_idx)
-    
+        filename=""
         if !isnothing(kappa)
             title(string(L"$\kappa_1 = $", kappa[1], L" $\kappa_2 = $", kappa[2]))
-            savefig(string("mpcac/kappa_1_$(kappa[1])_kappa_2_$(kappa[2]).png"))
+            global filename = string("mpcac/kappa_1_$(kappa[1])_kappa_2_$(kappa[2]).png")
         end
         if !isnothing(mu)
             title(string(L"$\mu_1 = $", mu[1], L" $\mu_2 = $", mu[2]))
-            savefig(string("mpcac/mu_1_$(mu[1])_mu_2_$(mu[2]).png"))
+            global filename =string("mpcac/mu_1_$(mu[1])_mu_2_$(mu[2]).png")
         end
-        
+        if savepl
+            savefig(filename)
+        else
             display(gcf())  
         end 
+    end                                                 
     if !data                   
         return mass                                        
     else