Nothing
if(!require("GNE"))stop("this test requires package GNE.")
try(funSSR("x"))
try(funSSR(rep(1, 2) , 1, grobj=function(x) x))
try(funSSR(rep(1, 2), rep(1, 2), grobj=function(x) x))
try(funSSR(rep(1, 2), rep(1, 2), grobj=function(x) x, compl=phiFB))
funSSR(rep(1, 2), rep(1, 2), grobj=function(x, i, j) x, compl=phiFB)
try(funSSR(rep(1, 2), rep(1, 2), grobj=function(x, i, j, arg) arg$x, compl=phiFB))
funSSR(rep(1, 2), rep(1, 2), grobj=function(x, i, j, arg) arg$x, arggrobj=list(x=1), compl=phiFB)
try(funSSR(rep(1, 2), rep(1, 2), rep(1, 3), grobj=function(x, i, j) x, compl=phiFB,
constr=function(x) x))
try(funSSR(rep(1, 2), rep(1, 2), rep(1, 3), grobj=function(x, i, j) x, compl=phiFB,
constr=function(x) x, grconstr=function(x) 1))
try(funSSR(rep(1, 2), rep(1, 2), rep(1, 2), grobj=function(x, i, j) x, compl=phiFB,
constr=function(x) x, grconstr=function(x) 1))
try(funSSR(rep(1, 4), rep(1, 2), rep(1, 2), grobj=function(x, i, j) x, compl=phiFB,
constr=function(x) x, grconstr=function(x) 1))
try(funSSR(rep(1, 4), rep(1, 2), rep(1, 2), grobj=function(x, i, j) x, compl=phiFB,
constr=function(x, i) x, grconstr=function(x) 1))
funSSR(rep(1, 4), rep(1, 2), rep(1, 2), grobj=function(x, i, j) x, compl=phiFB,
constr=function(x, i) x, grconstr=function(x, i, j) 1)
try(funSSR(rep(1, 4), rep(1, 2), rep(1, 2), grobj=function(x, i, j) x, compl=phiFB,
constr=function(x, i, arg) arg$x, grconstr=function(x, i, j) 1))
funSSR(rep(1, 4), rep(1, 2), rep(1, 2), grobj=function(x, i, j) x, compl=phiFB,
constr=function(x, i, arg) arg$x, argconstr=list(x=1), grconstr=function(x, i, j) 1)
try(funSSR(rep(1, 4), rep(1, 2), rep(1, 2), grobj=function(x, i, j) x, compl=phiFB,
constr=function(x, i) x, grconstr=function(x, i, j, arg) arg$x,
arggrconstr=list(x=1)))
try(funSSR(rep(1, 4), rep(1, 2), rep(1, 2), grobj=function(x, i, j) x, compl=phiFB,
constr=function(x, i) x, grconstr=function(x, i, j) 1,
joint=function(x) x))
try(funSSR(rep(1, 4), rep(1, 2), rep(1, 2), grobj=function(x, i, j) x, compl=phiFB,
constr=function(x, i) x, grconstr=function(x, i, j) 1,
joint=function(x) x, grjoint=function(x) 1, dimmu=1:2))
try(funSSR(rep(1, 4), rep(1, 2), rep(1, 2), grobj=function(x, i, j) x, compl=phiFB,
constr=function(x, i) x, grconstr=function(x, i, j) 1,
joint=function(x) x, grjoint=function(x) 1, dimmu=1))
funSSR(rep(1, 5), rep(1, 2), rep(1, 2), grobj=function(x, i, j) x, compl=phiFB,
constr=function(x, i) x, grconstr=function(x, i, j) 1,
joint=function(x) x, grjoint=function(x, j) 1, dimmu=1)
try(funSSR(rep(1, 5), rep(1, 2), rep(1, 2), grobj=function(x, i, j) x, compl=phiFB,
joint=function(x) x, grjoint=function(x, j) 1, dimmu=1))
funSSR(rep(1, 3), rep(1, 2), grobj=function(x, i, j) x, compl=phiFB,
joint=function(x) x, grjoint=function(x, j) 1, dimmu=1)
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.