powered by
curvePredictSigmoid(x, params)
alpha + beta*(2^(x*gamma))/(1+2^(x*gamma)))
x <- seq(-5, 5, by=0.1) y <- curvePredictSigmoid(x, c(alpha=2, beta=1, gamma=1.5)) plot(x, y)
Run the code above in your browser using DataLab