diff --git a/R/bayesiannetworkanalysis.R b/R/bayesiannetworkanalysis.R index 1ddd4a9..ba2e236 100644 --- a/R/bayesiannetworkanalysis.R +++ b/R/bayesiannetworkanalysis.R @@ -495,6 +495,7 @@ BayesianNetworkAnalysis <- function(jaspResults, dataset, options) { jaspGraphs::geom_point() + ggplot2::ylab("Posterior Structure Probability") + ggplot2::xlab("Structure Index") + + ggplot2::scale_y_continuous(expand = ggplot2::expansion(mult = c(0, 0.05))) + jaspGraphs::geom_rangeframe() + jaspGraphs::themeJaspRaw(legend.position = c(.85, 0.25)) @@ -696,6 +697,7 @@ BayesianNetworkAnalysis <- function(jaspResults, dataset, options) { jaspGraphs::geom_point() + ggplot2::ylab(gettext("Posterior Probability")) + ggplot2::xlab(gettext("Number of edges")) + + ggplot2::scale_y_continuous(expand = ggplot2::expansion(mult = c(0, 0.05))) + jaspGraphs::geom_rangeframe() + jaspGraphs::themeJaspRaw(legend.position = c(.85, 0.25))