# R Program to perform Inverse
# Cumulative Density Analysis
# Calling qt() Function
qt(.95, 10)
qt(.542, 15)
R
输出：
[1] 1.812461
[1] 0.1072654
R
例2：
# R Program to perform Inverse
# Cumulative Density Analysis
# Creating a vector
x <- seq(.1, .9, by = .1)
# Calling qt() Function
y <- qt(x, 15)
# Plotting probability distribution graph
plot(x, y, type ="l")
极客教程