如何在两个垂直上线之间绘制线性回归？答案

【问题标题】：How to plot a linear regression between two vertical abline?如何在两个垂直上线之间绘制线性回归？
【发布时间】：2014-04-23 10:06:50
【问题描述】：

我正在做一个关于闪亮的应用程序，我想仅在两个可以用滑块修改的垂直 abline 之间绘制线性回归。

我该怎么做？

shinyServer(function(input, output, session) {


output$plot.weibull <- renderPlot({   
PlotWeibull(my.data$X, my.data$Y)
if (input$fit.weibull) {
  FitWeibull(my.data)
  abline(FitWeibull(my.data), col = "blue")
  abline(v = log(input$reg.range), col = "blue", lty = 3)
    }
  })
})

【问题讨论】：

问题和解决方案与this 非常相似。使用vline x-intercepts 来确定两个点而不是数据范围。
对不起，我找不到这两个问题之间的相似之处。我可以创建一个函数来做我想做的事吗？在我指定的地方，两个 abline 之前或之后的所有点都不能用于线性回归？
情况几乎相同。而不是使用abline()（不能被约束），你需要使用lines()，它将取一个起点、一个终点，并在两者之间画一条线。

标签： r shiny

【解决方案1】：

你应该使用 abline(FitWeibull(my.data), col='blue') 而不是行：

lines(log(input$reg.range), FitWeibull(log(input$reg.range)), col=blue)

第二个参数可能会给你一个错误，因为input$reg.range 需要采用FitWeibull() 可以接受的格式。

【讨论】：