Error when using plot on a psa object without reference strategy

[evaenns]

On the dev-mk branch, when trying to run the plot function on a psa object without specifying a reference strategy (e.g. plot(psa_obj) or plot(psa_obj, ref_str = NULL) ), receive this error message:

Error in p_data@data : 
  no applicable method for `@` applied to an object of class "ggplot_built"

Presumably issue is somewhere in the plot.psa function

dampack/R/psa.R

Line 149 in c3300ae

plot.psa <- function(x,

[mbkauf]

This error was coming from the add_common_aes() function. I'm not getting the error on my end, but just to be safe, p_data@data is now p_data[[data]]. Please check again when you get a chance to see if you are still unable to create the plot.