绘制被分配到一个组的概率
Plotting the probability of being assigned to a group
本书中有一个有意义的图表 HERE（向下滚动一点）显示了研究中分配到某个组的概率如何随着假设的连续“X”（X 轴）而变化变量。
我想知道如何（大约）这个函数在 R 中绘制？
它叫做 Sigmoid function。
f <- \(x, a, b, c) {a/(1 + b*c^-x)}
curve(f(x, a=1, b=1, c=.5), xlim=c(-10, 10), main='Sigmoids', col=4, lwd=2)
curve(exp(x)/(exp(x) + 1), xlim=c(-10, 10), col='orange', lwd=2, add=TRUE)
legend('right', legend=c('foo', 'logistic'), col=c(4, 'orange'), lwd=2)
本书中有一个有意义的图表 HERE（向下滚动一点）显示了研究中分配到某个组的概率如何随着假设的连续“X”（X 轴）而变化变量。
我想知道如何（大约）这个函数在 R 中绘制？
它叫做 Sigmoid function。
f <- \(x, a, b, c) {a/(1 + b*c^-x)}
curve(f(x, a=1, b=1, c=.5), xlim=c(-10, 10), main='Sigmoids', col=4, lwd=2)
curve(exp(x)/(exp(x) + 1), xlim=c(-10, 10), col='orange', lwd=2, add=TRUE)
legend('right', legend=c('foo', 'logistic'), col=c(4, 'orange'), lwd=2)