# 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")