logistic distribution CDF in r

x <- seq(-10, 10, length.out = 100)
p <- plogis(x)
plot(x, p, type = "l", ylab = "F(x)", xlab = "x", main = "Logistic Distribution CDF")

The code above generates a sequence of 100 equally spaced values from -10 to 10 using the seq function and assigns it to the variable x. Then, the plogis function is used to calculate the logistic distribution cumulative distribution function (CDF) for the values in x and the result is stored in the variable p. Finally, the plot function is used to create a line plot of the CDF, with x on the x-axis, p on the y-axis, and appropriate labels for the axes and title.