cumtvd: Cumulative total variation distance.

Description Usage Arguments See Also Examples

View source: R/post.R

Description

method description

Usage

1
2
  cumtvd(exactgp, bnpostmcmclist, start = 1, end,
    nbin = (end - start + 1)/100)

Arguments

exactgp

...

bnpostmcmclist

...

start

...

end

...

nbin

...

...

Further arguments passed to method

See Also

xyplot.cumtvd, cumtvd.list

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
x1 <- factor(c(1, 1, 0, 1, 1, 1))
x2 <- factor(c(0, 1, 0, 1, 0, 1))
x3 <- factor(c(0, 1, 0, 0, 0, 0))
x <- data.frame(x1 = x1, x2 = x2, x3 = x3)

exact <- posterior(x, "exact")
exactgp <- gp(exact)
mcmc1 <- posterior(x, "mc3", nSamples = 1000, nBurnin = 100)
mcmc2 <- posterior(x, "mc3", nSamples = 1000, nBurnin = 100)

tvd <- cumtvd(exactgp = exactgp,
              bnpostmcmclist = bnpostmcmc.list(mcmc1, mcmc2))

rjbgoudie/structmcmc documentation built on Nov. 3, 2020, 3:41 a.m.