R/sizeparam_t_distn.R

In meko222/SyScSelection: Systemic Scenario Selection for Stress Testing

#' Calculates the size paramater for a d-dimensional hyperellipsoid conforming to a Student's t distribution.
#' @param prob The target probability threshold
#' @param d Number of dimensions in the multivariate distribution
#' @param nu Degrees of freedom parameter for the t distribution
#' @return The appropriate (scalar) size parameter
#' @import stats

sizeparam_t_distn <- function(prob,d,nu){
  return(d*qf(prob,d))
}