test_that("FlankRateOfSpread", {
checkData('FlankRateOfSpread',
flank_rate_of_spread,
list(data.table(ROS=ROS),
data.table(BROS=ROS),
data.table(LB=LB)))
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.