test_that("select_vpfiles() returns error on incorrect parameters", {

})