R 绘制套索L1约束

在套索回归中，使用L1约束：

我尝试使用R绘制约束。示例如下所示：

以下是我编写的简单R代码：

beta= seq(-1, 1, length=100)
lambda=2
penalty=lambda*abs(beta)
plot(penalty, type="l") 

它只绘制绘图的下部。我怎么能在一个图中也画上半部分呢？ 图为：

要绘制

abs（b1）+abs（b2）=1

您可以绘制

b2=1-abs（b1）

及其负值（因为

abs

意味着两者都是解决方案）

b1绘制
abs（b1）+abs（b2）=1
您可以绘制
b2=1-abs（b1）
及其负值（因为
abs
意味着两者都是解决方案）

b1你误解了那个情节。它显示了方程式abs（b1）+abs（b2）<1如果你只想绘图，你可以使用多边形，然后你只需要通过四个角coords@Ryan谢谢，那个么b1应该只是向量B的一个元素还是向量本身？你们误解了这个情节。它显示了方程式abs（b1）+abs（b2）<1如果你只想绘图，你可以使用多边形，然后你只需要通过四个角coords@Ryan谢谢，那么b1应该是向量B的一个元素还是向量本身？谢谢，这正是我想说的谢谢，这正是我想要策划的
b1 <- seq(-1, 1, .01)
b2 <- 1 - abs(b1)
plot(b1, b2, ylim = c(-1, 1), type = 'l')
b2 <- -b2
lines(b1, b2)