#roguevalley
#jacksoncounty
#RVAR
#voteoregon
#roguevalley
#jacksoncounty
#RVAR
#voteoregon
Ukraine Matters please like and subscribe to support the channel.
Ukraine Matters please like and subscribe to support the channel.
1. fit a big ol' complicated model that represents as much of the data generating process as you can, then
2. marginalize all that shit into the trash and report means
rvar_wasserstein_w1 <- function(a, b) {
rvar_sort_cols <- function(x) {
posterior::rvar(apply(posterior::draws_of(x), 2, sort))
}
# [... check dim and ndraws of a,b ...]
mean(abs(rvar_sort_cols(a) - rvar_sort_cols(b)))
}
rvar_wasserstein_w1 <- function(a, b) {
rvar_sort_cols <- function(x) {
posterior::rvar(apply(posterior::draws_of(x), 2, sort))
}
# [... check dim and ndraws of a,b ...]
mean(abs(rvar_sort_cols(a) - rvar_sort_cols(b)))
}
- do this for every posterior draw.
- this sounds hard. no, use rvar.
- do this for every posterior draw.
- this sounds hard. no, use rvar.