tests/testthat/test-mrfrj.R
In Freguglia/mrf2dbayes: Bayesian Analysis of Markov Random Fields on 2d Lattices
test_that("mrfrj works", {
z <- mrf2d::Z_potts
ll <- llapprox(z, mrfi(2), family = "oneeach", method = "pseudo")
result <- mrfrj(z = z,llapprox = ll, nsamples = 200)
expect_s3_class(result, "mrfbayes_out", TRUE)
})
Freguglia/mrf2dbayes documentation built on Jan. 19, 2024, 11:21 p.m.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
test_that("mrfrj works", {
z <- mrf2d::Z_potts
ll <- llapprox(z, mrfi(2), family = "oneeach", method = "pseudo")
result <- mrfrj(z = z,llapprox = ll, nsamples = 200)
expect_s3_class(result, "mrfbayes_out", TRUE)
})
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Embedding an R snippet on your website
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.