test_that('GB2011 to isic4',{
expect_equal(concordGB(c('0123','0133')),c('0113','0114'))
expect_equal(concordGB(c('0111','0113'), origin = 'isic4',destination = 'GB2017'),
c( "0112","0113","0119","0121","0122","0123","0133","0141","0142","0159"))
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.