library(testthat)
library(portvine)
data("sample_returns_small")

test_check("portvine", reporter = "summary")