Fig6.6 | R Documentation |
Reproduces Figure 6.6 from the book. If you specify any options, your results may look different.
Fig6.6(fit)
fit |
|
attach_data(brca1)
fit <- ncvreg(X, y, penalty="lasso")
obj <- mfdr(fit)
tail(subset(obj, mFDR < .1))
plot(obj)
# Lasso figure
Fig6.6(fit)
# An MCP figure
fit <- ncvreg(X, y)
Fig6.6(fit)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.