distn_to_x_support_probs: Get Support and Probability Vectors from a Distribution...

In DPComb: Discrete p-Value Combination Tests

Get Support and Probability Vectors from a Distribution Description

Description

Generates the support vector (i.e., increasingly sorted unique possible values) and the corresponding probability mass vector for a given discrete distribution description, including the name of the distribution and its parameters. Allows for replication.

Usage

distn_to_x_support_probs(distn_params, repN = 1)

Arguments

distn_params	A list containing: 1) distn: the distribution name. One of "binom", "pois", "hyper", "noncenhypergeom", "nbinom", or "geom". 2) Parameters for the specified distribution. They are consistent with the corresponding R density functions. See details.
repN	The number of support/probability vectors to generate. Default is 1.

Details

Supported distributions and their parameters:

• Binomial: list(distn = "binom", size = , prob = ).

• Poisson: list(distn = "pois", lambda = ).

• Hypergeometric: list(distn = "hyper", m = , n = , k = ).

• Noncentral Hypergeometric: list(distn = "noncenhypergeom", n1 = , n2 = , m1 = , psi = ). Requires the MCMCpack package.

• Negative Binomial: list(distn = "nbinom", size = , prob = ).

• Geometric: list(distn = "geom", prob = ).

Value

A list of repN replicated lists, each containing the x_support and x_prob vectors.

Examples

# For binomial distribution
distn_params <- list(distn = "binom", size = 5, prob = 0.1)
distn_to_x_support_probs(distn_params)
distn_to_x_support_probs(distn_params, 2) # replicate 2 times

# For Poisson distribution
distn_params <- list(distn = "pois", lambda = 100)
distn_to_x_support_probs(distn_params)

# For hypergeometric distribution
distn_params <- list(distn = "hyper", m = 10, n = 5, k = 3)
distn_to_x_support_probs(distn_params)

# For noncentral hypergeometric distribution
distn_params <- list(distn = "noncenhypergeom", n1 = 10, n2 = 5, m1 = 3, psi = 1)
distn_to_x_support_probs(distn_params) # same as the hypergeometric distribution when psi = 1
distn_params <- list(distn = "noncenhypergeom", n1 = 10, n2 = 5, m1 = 3, psi = 0.5)
distn_to_x_support_probs(distn_params) # smaller psi makes higher prob for smaller values
distn_params <- list(distn = "noncenhypergeom", n1 = 10, n2 = 5, m1 = 3, psi = 2)
distn_to_x_support_probs(distn_params) # larger psi makes higher prob for larger values

# For negative binomial distribution
distn_params <- list(distn = "nbinom", size = 5, prob = 0.1)
distn_to_x_support_probs(distn_params)

# For geometric distribution
distn_params <- list(distn = "geom", prob = 0.1)
distn_to_x_support_probs(distn_params)

DPComb documentation built on Aug. 22, 2026, 5:08 p.m.