在R中的glmnet图中的曲线上添加标签
恩索
我正在使用glmnet包从mtcars数据集获取以下图表（其他变量上mpg的回归）：
library(glmnet)
fit = glmnet(as.matrix(mtcars[-1]), mtcars[,1])
plot(fit, xvar='lambda')
如何在每条曲线的起点或在其最大y点（距x轴最大距离）处向每条曲线添加变量名称？我尝试过，可以像往常一样添加图例，但不能在每个曲线上或其开始处添加标签。谢谢你的帮助。
用户名
由于标签是硬编码的，因此编写快速功能可能更容易。这只是一个快速的快照，因此可以进行更彻底的更改。我还要指出的是，使用套索时，通常会有很多变量，因此标签会有很多重叠（如您的小示例所示）
lbs_fun <- function(fit, ...) {
L <- length(fit$lambda)
x <- log(fit$lambda[L])
y <- fit$beta[, L]
labs <- names(y)
text(x, y, labels=labs, ...)
}
# plot
plot(fit, xvar="lambda")
# label
lbs_fun(fit)
本文收集自互联网，转载请注明来源。
如有侵权，请联系[email protected] 删除。
编辑于
相关文章
Related 相关文章
- 1
在R中的标签上添加标签
- 2
R + ggplot2 =>在构面饼图中添加标签
- 3
在R中向饼图添加标签...辐射“辐射”？
- 4
在R中为剪切功能添加标签
- 5
在R的geom_line中添加标签
- 6
强制在图中的每个单独图形中的直方图上添加标签
- 7
如何使用R中的冲积层向每个阶层添加标签以在等级变化图中显示其他信息？
- 8
在堆叠的条形图中添加标签-ggvis
- 9
d3.js在和弦图中添加标签
- 10
片段中的Android添加标签
- 11
如何在PySide中添加标签
- 12
如何在div中添加标签
- 13
在ggalluvial中添加标签到alluvia
- 14
在QML中动态添加标签
- 15
片段中的Android添加标签
- 16
在flowLayoutPanel中的按钮下添加标签
- 17
如何在div中添加标签
- 18
在单词jquery中添加标签
- 19
在 prometheus_pushgateway 中添加标签
- 20
以编程方式在列中添加标签
- 21
在R ggplot中，如何在stat_qq中的点上添加标签？
- 22
PyQt：添加标签
- 23
使用GWT中的标签项动态添加标签
- 24
如何在R中的简单网络图上添加标签？提供的代码
- 25
在Windows 7中的文件中添加标签
- 26
使用infusionsoft API在公司记录中添加标签
- 27
如何在bokeh中的点上添加标签？
- 28
iOS Facebook在打开图故事中添加标签
- 29
在Apple Watch情节提要中的图像顶部添加标签
我来说两句