context("carre") test_that("longueur du vecteur", { x <- c(5,7,8,2) res <- squared(x) expect_length(res,4) })
Add the following code to your website.
REMOVE THIS Copy to clipboard
For more information on customizing the embed code, read Embedding Snippets.