tests/testthat/test_segnet.R

context("segnet")

test_that("segnet works as expected", {

  expect_works(s1 <- segnet(mode = "sampling"))
  expect_works(s1 %>% normalize_layers())
  
  expect_works(s2 <- segnet(mode = "convolutional"))
  expect_works(s2 %>% normalize_layers())

})
neuroimaginador/dl4ni documentation built on May 3, 2019, 5:47 p.m.