如何重新缩放logit输出值

Question

这是统计数据，但是在这里回答的问题很少。如果有异议，我会尽快删除这个问题。

我想重新调整logit值，以便缩放输出值，使min值为0或接近0，最大值接近1.

以下是样本数据

logit <- rlogis(100, location = 1, scale = 5)

y <- sort((1/(1+exp(-logit))))[40:(length(logit)-50)] # here removing the close to 0 and 1 to replicate the problem.
x <- 1:length(y)

data <- data.frame(y,x)

with(data, plot(y~x))

那么有人会指引我r package或者说明如何处理这个并重新调整这些值吗？感谢。

Answer 1

您只希望最小值和最大值具有较大的绝对值。

out_range <- c(-10,10)
L_sc1 <- (logit-min(logit))/diff(range(logit)) # rescale to [0,1]
L_sc2 <- out_range[1]+diff(out_range)*L_sc1    # rescale to (min,max)

绘制结果：

plot(sort(plogis(L_sc2)))