# NOT RUN {
set.seed(99927220)
rt(5,1) # central t
rt(5,1, 1:5*5) # noncetral t where stats:rt throws warnings
# }
# NOT RUN {
rt(5,1, c(NA, 1:4*5)) # noncetral t where stats:rt returns all NaN's
rt(5,1, c(1:4*5, NA)) # noncetral t where stats:rt throws extra warnings
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab