Compare nodes within networks or between networks. Currently the only option available is Bayesian R2.
assess_predictability(...)
object(s) of class R2
object of class metric
# NOT RUN {
# two groups (males vs females)
Y_m <- subset(tas, gender == "M")[,-ncol(tas)]
Y_f <- subset(tas, gender == "F")[,-ncol(tas)]
# fit models
fit_m <- estimate(Y_m)
fit_f <- estimate(Y_f)
# r2
r2_m <- bayes_R2(fit_m, iter = 50)
r2_f <- bayes_R2(fit_f, iter = 50)
# assess predictability
assess_pred <- assess_predictability(r2_m, r2_f)
# summary
assess_pred
# plot (small rope value removes it from the plot )
plot(assess_pred, rope = 0.001)
# }
Run the code above in your browser using DataLab