Nothing
library(buildmer)
library(testthat)
test_that('add.terms',{
form <- Reaction ~ Days + (1|Subject)
expect_equal(add.terms(form,'Days|Subject') ,Reaction ~ 1 + Days + (1 + Days | Subject))
expect_equal(add.terms(form,'(0+Days|Subject)') ,Reaction ~ 1 + Days + (1 | Subject) + (0 + Days | Subject))
expect_equal(add.terms(form,c('many','more|terms','to|terms','(be|added)','to|test')),Reaction ~ 1 + Days + many + (1 | Subject) + (0 + more + to | terms) + (be | added) + (0 + to | test))
})
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.