Slide 18
Slide 18 text
3Ͱ4FMFDUJWF*OGFSFODF
3Ͱͷճؼੳͷ4FMFDUJWF*OGFSFODF
TFMFDUJWF*OGFSFODFύοέʔδͰ࣮Մೳ
18
> # lassoʹ͓͚Δselective inferenceͷ࣮ߦྫ
> gfit = glmnet(x,y)
> lambda = .3
> beta_ls = coef(gfit, s=lambda/n)[-1]
> out = fixedLassoInf(x,y,beta_ls,lambda,sigma=sigma)