a
    BCCf4                    @   s.  d dl mZ d dlmZ d dlmZ d dlZd dlZd dl	m
Z
 d dlZd dlmZ ddlmZ dd	lmZ dd
lmZmZ d dlmZmZmZ d dlmZ ddlmZ ddlmZm Z! ddl"m#Z# d dlm$Z$ g dZ%eddZ&e#e&ddddUddZ'd ddddZ(dd Z)G d d! d!Z*d"d# Z+d$d% Z,dVd&d'Z-d(d) Z.e#e*dde.d*dWd,d-Z/d.d/ Z0d0d1 Z1d2d3 Z2dXd4d5Z3eG d6d7 d7Z4dYd8d9Z5d:d; Z6d<d= Z7eG d>d? d?Z8dZdBdCZ9eG dDdE dEZ:d[dFdGZ;dHdI Z<dJdK Z=e#e*dde.d*d\dMdNZ>G dOdP dPZ?dQdR Z@dSdT ZAdS )]    )
namedtuple)	dataclass)combN)combinations)shgo   )distributions)ConfidenceInterval)chi2norm)gammakvgammaln)ifft)_a_ij_Aij_Dij2)_concordant_pairs_discordant_pairs)_axis_nan_policy_factory)	_stats_py)epps_singleton_2sampcramervonmisessomersdbarnard_exactboschloo_exactcramervonmises_2samp	tukey_hsdpoisson_means_testEpps_Singleton_2sampResult	statisticpvalue      )	n_samples	too_smallg?g?c                 C   s  t |}t| t| }}|dk s,|dk rBtd| d| dt |  sXtdt | sntd|| }|jdkrtd|j dt |d	 rtd
d	dl	m
} |t | |fd }t |d| }t t ||  t ||  fj}	t t || t || fj}
t j|	jdd}t j|
jdd}|| | || |  }t j|}t j|}|dt| k rtjddd t j|	d	dt j|
d	d }|t |jt || }t||dk rdd|d  d|d |d     }|| }t||}t||S )a
  Compute the Epps-Singleton (ES) test statistic.

    Test the null hypothesis that two samples have the same underlying
    probability distribution.

    Parameters
    ----------
    x, y : array-like
        The two samples of observations to be tested. Input must not have more
        than one dimension. Samples can have different lengths.
    t : array-like, optional
        The points (t1, ..., tn) where the empirical characteristic function is
        to be evaluated. It should be positive distinct numbers. The default
        value (0.4, 0.8) is proposed in [1]_. Input must not have more than
        one dimension.

    Returns
    -------
    statistic : float
        The test statistic.
    pvalue : float
        The associated p-value based on the asymptotic chi2-distribution.

    See Also
    --------
    ks_2samp, anderson_ksamp

    Notes
    -----
    Testing whether two samples are generated by the same underlying
    distribution is a classical question in statistics. A widely used test is
    the Kolmogorov-Smirnov (KS) test which relies on the empirical
    distribution function. Epps and Singleton introduce a test based on the
    empirical characteristic function in [1]_.

    One advantage of the ES test compared to the KS test is that is does
    not assume a continuous distribution. In [1]_, the authors conclude
    that the test also has a higher power than the KS test in many
    examples. They recommend the use of the ES test for discrete samples as
    well as continuous samples with at least 25 observations each, whereas
    `anderson_ksamp` is recommended for smaller sample sizes in the
    continuous case.

    The p-value is computed from the asymptotic distribution of the test
    statistic which follows a `chi2` distribution. If the sample size of both
    `x` and `y` is below 25, the small sample correction proposed in [1]_ is
    applied to the test statistic.

    The default values of `t` are determined in [1]_ by considering
    various distributions and finding good values that lead to a high power
    of the test in general. Table III in [1]_ gives the optimal values for
    the distributions tested in that study. The values of `t` are scaled by
    the semi-interquartile range in the implementation, see [1]_.

    References
    ----------
    .. [1] T. W. Epps and K. J. Singleton, "An omnibus test for the two-sample
       problem using the empirical characteristic function", Journal of
       Statistical Computation and Simulation 26, p. 177--203, 1986.

    .. [2] S. J. Goerg and J. Kaiser, "Nonparametric testing of distributions
       - the Epps-Singleton two-sample test using the empirical characteristic
       function", The Stata Journal 9(3), p. 454--465, 2009.

       z6x and y should have at least 5 elements, but len(x) = z and len(y) = .z$x must not contain nonfinite values.z$y must not contain nonfinite values.r   z t must be 1d, but t.ndim equals r   z&t must contain positive elements only.)iqrr!   )r   T)ZbiaszEstimated covariance matrix does not have full rank. This indicates a bad choice of the input t and the test might not be consistent.)
stacklevelZaxis         ?gܿg333333$@g333333)npasarraylen
ValueErrorisfiniteallndimZ
less_equalanyscipy.statsr(   ZhstackreshapeZvstackcossinTZcovZlinalgZpinvZmatrix_rankwarningswarnmeandotmaxr
   sfr   )xytnxnynr(   sigmatsZgxgyZcov_xZcov_yZest_covZest_cov_invrZg_diffwZcorrp rM   R/var/www/html/django/DPS/env/lib/python3.9/site-packages/scipy/stats/_hypotests.pyr      sL    D


$$$r   	two-sided)diffalternativec                C   s  t | ||||| | | ||  || ||   }|dkrFtddS | |d  ||d   }| | ||  | t| }|||  }	|| }
tjddg|	\}}tjddg|
\}}t||d }t||d dddf }tj	||	}tj	||
}|| }|| }|| | }|| ||  }tj
ddd |t| }W d   n1 sd0    Y  |d	krt|t|k}n|d
kr||k}n||k}t|| | }t||S )a  
    Performs the Poisson means test, AKA the "E-test".

    This is a test of the null hypothesis that the difference between means of
    two Poisson distributions is `diff`. The samples are provided as the
    number of events `k1` and `k2` observed within measurement intervals
    (e.g. of time, space, number of observations) of sizes `n1` and `n2`.

    Parameters
    ----------
    k1 : int
        Number of events observed from distribution 1.
    n1: float
        Size of sample from distribution 1.
    k2 : int
        Number of events observed from distribution 2.
    n2 : float
        Size of sample from distribution 2.
    diff : float, default=0
        The hypothesized difference in means between the distributions
        underlying the samples.
    alternative : {'two-sided', 'less', 'greater'}, optional
        Defines the alternative hypothesis.
        The following options are available (default is 'two-sided'):

          * 'two-sided': the difference between distribution means is not
            equal to `diff`
          * 'less': the difference between distribution means is less than
            `diff`
          * 'greater': the difference between distribution means is greater
            than `diff`

    Returns
    -------
    statistic : float
        The test statistic (see [1]_ equation 3.3).
    pvalue : float
        The probability of achieving such an extreme value of the test
        statistic under the null hypothesis.

    Notes
    -----

    Let:

    .. math:: X_1 \sim \mbox{Poisson}(\mathtt{n1}\lambda_1)

    be a random variable independent of

    .. math:: X_2  \sim \mbox{Poisson}(\mathtt{n2}\lambda_2)

    and let ``k1`` and ``k2`` be the observed values of :math:`X_1`
    and :math:`X_2`, respectively. Then `poisson_means_test` uses the number
    of observed events ``k1`` and ``k2`` from samples of size ``n1`` and
    ``n2``, respectively, to test the null hypothesis that

    .. math::
       H_0: \lambda_1 - \lambda_2 = \mathtt{diff}

    A benefit of the E-test is that it has good power for small sample sizes,
    which can reduce sampling costs [1]_. It has been evaluated and determined
    to be more powerful than the comparable C-test, sometimes referred to as
    the Poisson exact test.

    References
    ----------
    .. [1]  Krishnamoorthy, K., & Thomson, J. (2004). A more powerful test for
       comparing two Poisson means. Journal of Statistical Planning and
       Inference, 119(1), 23-35.

    .. [2]  Przyborowski, J., & Wilenski, H. (1940). Homogeneity of results in
       testing samples from Poisson series: With an application to testing
       clover seed for dodder. Biometrika, 31(3/4), 313-323.

    Examples
    --------

    Suppose that a gardener wishes to test the number of dodder (weed) seeds
    in a sack of clover seeds that they buy from a seed company. It has
    previously been established that the number of dodder seeds in clover
    follows the Poisson distribution.

    A 100 gram sample is drawn from the sack before being shipped to the
    gardener. The sample is analyzed, and it is found to contain no dodder
    seeds; that is, `k1` is 0. However, upon arrival, the gardener draws
    another 100 gram sample from the sack. This time, three dodder seeds are
    found in the sample; that is, `k2` is 3. The gardener would like to
    know if the difference is significant and not due to chance. The
    null hypothesis is that the difference between the two samples is merely
    due to chance, or that :math:`\lambda_1 - \lambda_2 = \mathtt{diff}`
    where :math:`\mathtt{diff} = 0`. The alternative hypothesis is that the
    difference is not due to chance, or :math:`\lambda_1 - \lambda_2 \ne 0`.
    The gardener selects a significance level of 5% to reject the null
    hypothesis in favor of the alternative [2]_.

    >>> import scipy.stats as stats
    >>> res = stats.poisson_means_test(0, 100, 3, 100)
    >>> res.statistic, res.pvalue
    (-1.7320508075688772, 0.08837900929018157)

    The p-value is .088, indicating a near 9% chance of observing a value of
    the test statistic under the null hypothesis. This exceeds 5%, so the
    gardener does not reject the null hypothesis as the difference cannot be
    regarded as significant at this level.
    r   r   r!   g|=g?Nignore)invaliddividerO   less)_poisson_means_test_ivr   ZSignificanceResultr.   sqrtr   ZpoissonppfarangeZpmferrstateabssum)k1n1k2n2rP   rQ   Z	lmbd_hat2varZt_k1k2Z
nlmbd_hat1Z
nlmbd_hat2Zx1_lbZx1_ubZx2_lbZx2_ubx1x2Zprob_x1Zprob_x2Zlmbd_x1Zlmbd_x2Z
lmbds_diffZvar_x1x2Zt_x1x2Z	indicatorr    rM   rM   rN   r      s6    k .


r   c                 C   s   | t | ks|t |kr tdd}| dk s4|dk r<t||dksL|dkrTtd|dk rdtdh d}| |vrtd| dd S )	Nz`k1` and `k2` must be integers.z1`k1` and `k2` must be greater than or equal to 0.r   z%`n1` and `n2` must be greater than 0.z(diff must be greater than or equal to 0.>   rO   greaterrU   zAlternative must be one of 'z'.)int	TypeErrorr1   lower)r]   r^   r_   r`   rP   rQ   Z	count_errZalternativesrM   rM   rN   rV   N  s    rV   c                   @   s   e Zd Zdd Zdd ZdS )CramerVonMisesResultc                 C   s   || _ || _d S Nr   )selfr   r    rM   rM   rN   __init__c  s    zCramerVonMisesResult.__init__c                 C   s   | j j d| j d| j dS )Nz(statistic=z	, pvalue=))	__class____name__r   r    )rj   rM   rM   rN   __repr__g  s    zCramerVonMisesResult.__repr__N)rn   
__module____qualname__rk   ro   rM   rM   rM   rN   rh   b  s   rh   c                    s   dd  dd  fdd}t | } t j| dd}t j| d	d}d
}t |r||| |  t jt|d   }|| | ||< t |dk||< |d7 }qH|S )u  
    psi1 is defined in equation 1.10 in Csörgő, S. and Faraway, J. (1996).
    This implements a modified version by excluding the term V(x) / 12
    (here: _cdf_cvm_inf(x) / 12) to avoid evaluating _cdf_cvm_inf(x)
    twice in _cdf_cvm.

    Implementation based on MAPLE code of Julian Faraway and R code of the
    function pCvM in the package goftest (v1.1.1), permission granted
    by Adrian Baddeley. Main difference in the implementation: the code
    here keeps adding terms of the series until the terms are small enough.
    c                 S   sH   | d d }t d|t d| }t| | d d  | ttj S )Nr!   r"         ?      ?      ?)r   r.   exprW   pi)rB   zbrM   rM   rN   _ed2y  s    z_psi1_mod.<locals>._ed2c                 S   sZ   | d d }t | t t j }|| d d  dtd| dtd|  td|  S )Nr!   r"   g      @rr      rs         ?)r.   ru   rW   rv   r   )rB   rw   crM   rM   rN   _ed3~  s    z_psi1_mod.<locals>._ed3c                    s&  d|  d }dt | }|d }|d }|t| d   d|  d |  d|  }t| d d|  d |  d	|  }d|d  t| d
  d|  d |  d|  }d| t| d   d|  d |  d|  }	d| t| d   d|  d |  d|  }
|| | |	 |
 S )Nr!   r   rs   r{         ?r"   rz   	   H   rt   r&            )r.   rW   r   )krA   msxy1y2e1e2Ze3Ze4Ze5ry   r}   rM   rN   _Ak  s    ,(400z_psi1_mod.<locals>._AkfloatZdtypeboolr   r   Hz>)r.   r/   
zeros_like	ones_liker5   rv   r   r[   )rA   r   totcondr   rw   rM   r   rN   	_psi1_modl  s    

"
r   c                 C   sz   t | } dd }t j| dd}t j| dd}d}t |rv|| | |}|| | ||< t |dk||< |d7 }q2|S )	u2  
    Calculate the cdf of the Cramér-von Mises statistic (infinite sample size).

    See equation 1.2 in Csörgő, S. and Faraway, J. (1996).

    Implementation based on MAPLE code of Julian Faraway and R code of the
    function pCvM in the package goftest (v1.1.1), permission granted
    by Adrian Baddeley. Main difference in the implementation: the code
    here keeps adding terms of the series until the terms are small enough.

    The function is not expected to be accurate for large values of x, say
    x > 4, when the cdf is very close to 1.
    c                 S   sv   t t|d t|d  t jd t |   }d| d }|d d|   }td|}|t | t |  | S )Nr~   r   rt   r"   r!      rr   )r.   ru   r   rv   rW   r   )rA   r   urB   qrx   rM   rM   rN   term  s
    2
z_cdf_cvm_inf.<locals>.termr   r   r   r   r   r   )r.   r/   r   r   r5   r[   )rA   r   r   r   r   rw   rM   rM   rN   _cdf_cvm_inf  s    


r   c                 C   s   t | } |du rt| }njt j| dd}dd|  | k | |d k @ }t| | ddd|    t| | |  ||< d|| |d k< |jd	kr|d
 S |S )u  
    Calculate the cdf of the Cramér-von Mises statistic for a finite sample
    size n. If N is None, use the asymptotic cdf (n=inf).

    See equation 1.8 in Csörgő, S. and Faraway, J. (1996) for finite samples,
    1.2 for the asymptotic cdf.

    The function is not expected to be accurate for large values of x, say
    x > 2, when the cdf is very close to 1 and it might return values > 1
    in that case, e.g. _cdf_cvm(2.0, 12) = 1.0000027556716846. Moreover, it
    is not accurate for small values of n, especially close to the bounds of
    the distribution's domain, [1/(12*n), n/3], where the value jumps to 0
    and 1, respectively. These are limitations of the approximation by Csörgő
    and Faraway (1996) implemented in this function.
    Nr   r   r-   r   g      @r   rz   r   rM   )r.   r/   r   r   r   r4   )rA   rF   rB   suprM   rM   rN   _cdf_cvm  s    

0
r   c                 C   s   | j | jfS ri   r   )resrM   rM   rN   _cvm_result_to_tuple  s    r   )r#   r$   Zresult_to_tuplerM   c           	      C   s   t |trtt|j}tt| }|jdkr8t	dt
|}||g|R  }dtd|d  d d|  }dd|  t|| d  }tddt|| }t||dS )u  Perform the one-sample Cramér-von Mises test for goodness of fit.

    This performs a test of the goodness of fit of a cumulative distribution
    function (cdf) :math:`F` compared to the empirical distribution function
    :math:`F_n` of observed random variates :math:`X_1, ..., X_n` that are
    assumed to be independent and identically distributed ([1]_).
    The null hypothesis is that the :math:`X_i` have cumulative distribution
    :math:`F`.

    Parameters
    ----------
    rvs : array_like
        A 1-D array of observed values of the random variables :math:`X_i`.
    cdf : str or callable
        The cumulative distribution function :math:`F` to test the
        observations against. If a string, it should be the name of a
        distribution in `scipy.stats`. If a callable, that callable is used
        to calculate the cdf: ``cdf(x, *args) -> float``.
    args : tuple, optional
        Distribution parameters. These are assumed to be known; see Notes.

    Returns
    -------
    res : object with attributes
        statistic : float
            Cramér-von Mises statistic.
        pvalue : float
            The p-value.

    See Also
    --------
    kstest, cramervonmises_2samp

    Notes
    -----
    .. versionadded:: 1.6.0

    The p-value relies on the approximation given by equation 1.8 in [2]_.
    It is important to keep in mind that the p-value is only accurate if
    one tests a simple hypothesis, i.e. the parameters of the reference
    distribution are known. If the parameters are estimated from the data
    (composite hypothesis), the computed p-value is not reliable.

    References
    ----------
    .. [1] Cramér-von Mises criterion, Wikipedia,
           https://en.wikipedia.org/wiki/Cram%C3%A9r%E2%80%93von_Mises_criterion
    .. [2] Csörgő, S. and Faraway, J. (1996). The Exact and Asymptotic
           Distribution of Cramér-von Mises Statistics. Journal of the
           Royal Statistical Society, pp. 221-234.

    Examples
    --------

    Suppose we wish to test whether data generated by ``scipy.stats.norm.rvs``
    were, in fact, drawn from the standard normal distribution. We choose a
    significance level of ``alpha=0.05``.

    >>> import numpy as np
    >>> from scipy import stats
    >>> rng = np.random.default_rng(165417232101553420507139617764912913465)
    >>> x = stats.norm.rvs(size=500, random_state=rng)
    >>> res = stats.cramervonmises(x, 'norm')
    >>> res.statistic, res.pvalue
    (0.1072085112565724, 0.5508482238203407)

    The p-value exceeds our chosen significance level, so we do not
    reject the null hypothesis that the observed sample is drawn from the
    standard normal distribution.

    Now suppose we wish to check whether the same samples shifted by 2.1 is
    consistent with being drawn from a normal distribution with a mean of 2.

    >>> y = x + 2.1
    >>> res = stats.cramervonmises(y, 'norm', args=(2,))
    >>> res.statistic, res.pvalue
    (0.8364446265294695, 0.00596286797008283)

    Here we have used the `args` keyword to specify the mean (``loc``)
    of the normal distribution to test the data against. This is equivalent
    to the following, in which we create a frozen normal distribution with
    mean 2.1, then pass its ``cdf`` method as an argument.

    >>> frozen_dist = stats.norm(loc=2)
    >>> res = stats.cramervonmises(y, frozen_dist.cdf)
    >>> res.statistic, res.pvalue
    (0.8364446265294695, 0.00596286797008283)

    In either case, we would reject the null hypothesis that the observed
    sample is drawn from a normal distribution with a mean of 2 (and default
    variance of 1) because the p-value is less than our chosen
    significance level.

    r   z2The sample must contain at least two observations.r!   r   r   r-   r   )
isinstancestrgetattrr   cdfr.   sortr/   sizer1   r0   rY   r\   r?   r   rh   )	Zrvsr   argsvalsrF   Zcdfvalsr   rK   rL   rM   rM   rN   r     s    a

 r   c                 C   s~   t jdt jd}td| d D ]Z}|}t j||d  d d t jd}t|}|d |d|< || d  |d 7  < q|S )z
    Distribution of probability of the Wilcoxon ranksum statistic r_plus (sum
    of ranks of positive differences).
    Returns an array with the probabilities of all the possible ranks
    r = 0, ..., n*(n+1)/2
    r   r   r!   r~   N)r.   onesfloat64rangezerosr0   )rF   r|   r   Zprev_cr   rM   rM   rN   _get_wilcoxon_distr\  s     r   c           
      C   s   t d| d dddf }| | d  d }d| }t |}dt j | | }t jt || dd}t d| | | }t t|}t t	|d }	|ddd |	dd< |	d  d  < |	d |	d< |	S )a  
    Distribution of probability of the Wilcoxon ranksum statistic r_plus (sum
    of ranks of positive differences).
    Returns an array with the probabilities of all the possible ranks
    r = 0, ..., n*(n+1)/2
    This is a slower reference function
    References
    ----------
    .. [1] 1. Harris T, Hardin JW. Exact Wilcoxon Signed-Rank and Wilcoxon
        Mann-Whitney Ranksum Tests. The Stata Journal. 2013;13(2):337-343.
    r   Nr!   r   r+   y              ?r)   )
r.   rY   rv   prodr8   ru   realr   r   re   )
rF   ZairC   r   jthetaZphi_spZphi_srL   r   rM   rM   rN   _get_wilcoxon_distr2m  s    
r   c                 C   s   | j d dks| j d dkr(tjtjfS |  }t| }t| }| jddd  }| jddd  }|d | |d |  }|| |d  }dt| || d |   }|| }	|	dkr|dfS ||	d  }
dtt	|
 }||fS )z=Calculate Kendall's tau-b and p-value from contingency table.r   r   r+   r!   r~   r"   )
shaper.   nanr\   _P_Qr   r   r@   r[   )ANAPAQASri2ZScj2denominatortau	numeratorZ	s02_tau_bZrL   rM   rM   rN   _tau_b  s     r   c                 C   s   | j d dks| j d dkr(tjtjfS |  }|d }t| }t| }| jddd  }|| ||  }t| || d |  }tjdd$ || d| d  }	W d	   n1 s0    Y  tj	j
|	tj|}
||
fS )
z7Calculate Somers' D and p-value from contingency table.r   r   r!   r+   rR   )rT   r"   r~   N)r   r.   r   r\   r   r   r   rZ   scipystatsr   Z_get_pvaluer   r   )r   rQ   r   ZNA2r   r   r   dSr   rL   rM   rM   rN   	_somers_d  s    2r   c                   @   s(   e Zd ZU eed< eed< ejed< dS )SomersDResultr   r    tableN)rn   rp   rq   r   __annotations__r.   ZndarrayrM   rM   rM   rN   r     s   
r   c                 C   s   t | t | } }| jdkrJ| j|jkr4tdtjj| |d }nd| jdkrt 	| dk rjtdt 	| | 
tkrtd|  d jdk rtd| }ntdt|
t|\}}t|||}||_|S )	a  Calculates Somers' D, an asymmetric measure of ordinal association.

    Like Kendall's :math:`\tau`, Somers' :math:`D` is a measure of the
    correspondence between two rankings. Both statistics consider the
    difference between the number of concordant and discordant pairs in two
    rankings :math:`X` and :math:`Y`, and both are normalized such that values
    close  to 1 indicate strong agreement and values close to -1 indicate
    strong disagreement. They differ in how they are normalized. To show the
    relationship, Somers' :math:`D` can be defined in terms of Kendall's
    :math:`\tau_a`:

    .. math::
        D(Y|X) = \frac{\tau_a(X, Y)}{\tau_a(X, X)}

    Suppose the first ranking :math:`X` has :math:`r` distinct ranks and the
    second ranking :math:`Y` has :math:`s` distinct ranks. These two lists of
    :math:`n` rankings can also be viewed as an :math:`r \times s` contingency
    table in which element :math:`i, j` is the number of rank pairs with rank
    :math:`i` in ranking :math:`X` and rank :math:`j` in ranking :math:`Y`.
    Accordingly, `somersd` also allows the input data to be supplied as a
    single, 2D contingency table instead of as two separate, 1D rankings.

    Note that the definition of Somers' :math:`D` is asymmetric: in general,
    :math:`D(Y|X) \neq D(X|Y)`. ``somersd(x, y)`` calculates Somers'
    :math:`D(Y|X)`: the "row" variable :math:`X` is treated as an independent
    variable, and the "column" variable :math:`Y` is dependent. For Somers'
    :math:`D(X|Y)`, swap the input lists or transpose the input table.

    Parameters
    ----------
    x : array_like
        1D array of rankings, treated as the (row) independent variable.
        Alternatively, a 2D contingency table.
    y : array_like, optional
        If `x` is a 1D array of rankings, `y` is a 1D array of rankings of the
        same length, treated as the (column) dependent variable.
        If `x` is 2D, `y` is ignored.
    alternative : {'two-sided', 'less', 'greater'}, optional
        Defines the alternative hypothesis. Default is 'two-sided'.
        The following options are available:
        * 'two-sided': the rank correlation is nonzero
        * 'less': the rank correlation is negative (less than zero)
        * 'greater':  the rank correlation is positive (greater than zero)

    Returns
    -------
    res : SomersDResult
        A `SomersDResult` object with the following fields:

            statistic : float
               The Somers' :math:`D` statistic.
            pvalue : float
               The p-value for a hypothesis test whose null
               hypothesis is an absence of association, :math:`D=0`.
               See notes for more information.
            table : 2D array
               The contingency table formed from rankings `x` and `y` (or the
               provided contingency table, if `x` is a 2D array)

    See Also
    --------
    kendalltau : Calculates Kendall's tau, another correlation measure.
    weightedtau : Computes a weighted version of Kendall's tau.
    spearmanr : Calculates a Spearman rank-order correlation coefficient.
    pearsonr : Calculates a Pearson correlation coefficient.

    Notes
    -----
    This function follows the contingency table approach of [2]_ and
    [3]_. *p*-values are computed based on an asymptotic approximation of
    the test statistic distribution under the null hypothesis :math:`D=0`.

    Theoretically, hypothesis tests based on Kendall's :math:`tau` and Somers'
    :math:`D` should be identical.
    However, the *p*-values returned by `kendalltau` are based
    on the null hypothesis of *independence* between :math:`X` and :math:`Y`
    (i.e. the population from which pairs in :math:`X` and :math:`Y` are
    sampled contains equal numbers of all possible pairs), which is more
    specific than the null hypothesis :math:`D=0` used here. If the null
    hypothesis of independence is desired, it is acceptable to use the
    *p*-value returned by `kendalltau` with the statistic returned by
    `somersd` and vice versa. For more information, see [2]_.

    Contingency tables are formatted according to the convention used by
    SAS and R: the first ranking supplied (``x``) is the "row" variable, and
    the second ranking supplied (``y``) is the "column" variable. This is
    opposite the convention of Somers' original paper [1]_.

    References
    ----------
    .. [1] Robert H. Somers, "A New Asymmetric Measure of Association for
           Ordinal Variables", *American Sociological Review*, Vol. 27, No. 6,
           pp. 799--811, 1962.

    .. [2] Morton B. Brown and Jacqueline K. Benedetti, "Sampling Behavior of
           Tests for Correlation in Two-Way Contingency Tables", *Journal of
           the American Statistical Association* Vol. 72, No. 358, pp.
           309--315, 1977.

    .. [3] SAS Institute, Inc., "The FREQ Procedure (Book Excerpt)",
           *SAS/STAT 9.2 User's Guide, Second Edition*, SAS Publishing, 2009.

    .. [4] Laerd Statistics, "Somers' d using SPSS Statistics", *SPSS
           Statistics Tutorials and Statistical Guides*,
           https://statistics.laerd.com/spss-tutorials/somers-d-using-spss-statistics.php,
           Accessed July 31, 2020.

    Examples
    --------
    We calculate Somers' D for the example given in [4]_, in which a hotel
    chain owner seeks to determine the association between hotel room
    cleanliness and customer satisfaction. The independent variable, hotel
    room cleanliness, is ranked on an ordinal scale: "below average (1)",
    "average (2)", or "above average (3)". The dependent variable, customer
    satisfaction, is ranked on a second scale: "very dissatisfied (1)",
    "moderately dissatisfied (2)", "neither dissatisfied nor satisfied (3)",
    "moderately satisfied (4)", or "very satisfied (5)". 189 customers
    respond to the survey, and the results are cast into a contingency table
    with the hotel room cleanliness as the "row" variable and customer
    satisfaction as the "column" variable.

    +-----+-----+-----+-----+-----+-----+
    |     | (1) | (2) | (3) | (4) | (5) |
    +=====+=====+=====+=====+=====+=====+
    | (1) | 27  | 25  | 14  | 7   | 0   |
    +-----+-----+-----+-----+-----+-----+
    | (2) | 7   | 14  | 18  | 35  | 12  |
    +-----+-----+-----+-----+-----+-----+
    | (3) | 1   | 3   | 2   | 7   | 17  |
    +-----+-----+-----+-----+-----+-----+

    For example, 27 customers assigned their room a cleanliness ranking of
    "below average (1)" and a corresponding satisfaction of "very
    dissatisfied (1)". We perform the analysis as follows.

    >>> from scipy.stats import somersd
    >>> table = [[27, 25, 14, 7, 0], [7, 14, 18, 35, 12], [1, 3, 2, 7, 17]]
    >>> res = somersd(table)
    >>> res.statistic
    0.6032766111513396
    >>> res.pvalue
    1.0007091191074533e-27

    The value of the Somers' D statistic is approximately 0.6, indicating
    a positive correlation between room cleanliness and customer satisfaction
    in the sample.
    The *p*-value is very small, indicating a very small probability of
    observing such an extreme value of the statistic under the null
    hypothesis that the statistic of the entire population (from which
    our sample of 189 customers is drawn) is zero. This supports the
    alternative hypothesis that the true value of Somers' D for the population
    is nonzero.

    r   z!Rankings must be of equal length.r!   r   z;All elements of the contingency table must be non-negative.z6All elements of the contingency table must be integer.z?At least two elements of the contingency table must be nonzero.z!x must be either a 1D or 2D array)r.   arrayr4   r   r1   r   r   ZcontingencyZcrosstabr5   astypere   Znonzeror   r   r   Zcorrelation)rA   rB   rQ   r   r   rL   r   rM   rM   rN   r     s&     

r   c                 c   sV   t | | }t|| D ]8}t |}t | | t}d||< || }||fV  qdS )z
    Partition a set of indices into two fixed-length sets in all possible ways

    Partition a set of indices 0 ... nx + ny - 1 into two sets of length nx and
    ny in all possible ways (ignoring order of elements).
    FN)r.   rY   r   r   r   r   )rD   rE   rw   r|   rA   maskrB   rM   rM   rN   _all_partitions{  s    
r   c                 C   s4   t t| d d }t | d | |ddd  S )z'Compute all log combination of C(n, k).r   Nr)   )r   r.   rY   )rF   Zgammaln_arrrM   rM   rN   _compute_log_combinations  s    r   c                   @   s   e Zd ZU eed< eed< dS )BarnardExactResultr   r    Nrn   rp   rq   r   r   rM   rM   rM   rN   r     s   
r   T    c                 C   s8  |dkrt d|tj| tjd} | jdks8t dt| dk rNt dd| jddv rjttjdS | jdd\}}tj	|d	 tjd
d
d	}tj	|d	 tjd
d	d
}|| ||  }}	|r|| ||  }
|
d	|
  d	| d	|   }n |d	|  | |	d	|	  |  }tjddd& t||	 t|}W d   n1 sR0    Y  d|||	k< || d | d f }|dkrt|t|k}n:|dkr||k}n&|dkr||k}nd|}t ||| }t|}t|}|| ||  }tt|||fd|dd}tjt|j dd	d}t||S )a  Perform a Barnard exact test on a 2x2 contingency table.

    Parameters
    ----------
    table : array_like of ints
        A 2x2 contingency table.  Elements should be non-negative integers.

    alternative : {'two-sided', 'less', 'greater'}, optional
        Defines the null and alternative hypotheses. Default is 'two-sided'.
        Please see explanations in the Notes section below.

    pooled : bool, optional
        Whether to compute score statistic with pooled variance (as in
        Student's t-test, for example) or unpooled variance (as in Welch's
        t-test). Default is ``True``.

    n : int, optional
        Number of sampling points used in the construction of the sampling
        method. Note that this argument will automatically be converted to
        the next higher power of 2 since `scipy.stats.qmc.Sobol` is used to
        select sample points. Default is 32. Must be positive. In most cases,
        32 points is enough to reach good precision. More points comes at
        performance cost.

    Returns
    -------
    ber : BarnardExactResult
        A result object with the following attributes.

        statistic : float
            The Wald statistic with pooled or unpooled variance, depending
            on the user choice of `pooled`.

        pvalue : float
            P-value, the probability of obtaining a distribution at least as
            extreme as the one that was actually observed, assuming that the
            null hypothesis is true.

    See Also
    --------
    chi2_contingency : Chi-square test of independence of variables in a
        contingency table.
    fisher_exact : Fisher exact test on a 2x2 contingency table.
    boschloo_exact : Boschloo's exact test on a 2x2 contingency table,
        which is an uniformly more powerful alternative to Fisher's exact test.

    Notes
    -----
    Barnard's test is an exact test used in the analysis of contingency
    tables. It examines the association of two categorical variables, and
    is a more powerful alternative than Fisher's exact test
    for 2x2 contingency tables.

    Let's define :math:`X_0` a 2x2 matrix representing the observed sample,
    where each column stores the binomial experiment, as in the example
    below. Let's also define :math:`p_1, p_2` the theoretical binomial
    probabilities for  :math:`x_{11}` and :math:`x_{12}`. When using
    Barnard exact test, we can assert three different null hypotheses :

    - :math:`H_0 : p_1 \geq p_2` versus :math:`H_1 : p_1 < p_2`,
      with `alternative` = "less"

    - :math:`H_0 : p_1 \leq p_2` versus :math:`H_1 : p_1 > p_2`,
      with `alternative` = "greater"

    - :math:`H_0 : p_1 = p_2` versus :math:`H_1 : p_1 \neq p_2`,
      with `alternative` = "two-sided" (default one)

    In order to compute Barnard's exact test, we are using the Wald
    statistic [3]_ with pooled or unpooled variance.
    Under the default assumption that both variances are equal
    (``pooled = True``), the statistic is computed as:

    .. math::

        T(X) = \frac{
            \hat{p}_1 - \hat{p}_2
        }{
            \sqrt{
                \hat{p}(1 - \hat{p})
                (\frac{1}{c_1} +
                \frac{1}{c_2})
            }
        }

    with :math:`\hat{p}_1, \hat{p}_2` and :math:`\hat{p}` the estimator of
    :math:`p_1, p_2` and :math:`p`, the latter being the combined probability,
    given the assumption that :math:`p_1 = p_2`.

    If this assumption is invalid (``pooled = False``), the statistic is:

    .. math::

        T(X) = \frac{
            \hat{p}_1 - \hat{p}_2
        }{
            \sqrt{
                \frac{\hat{p}_1 (1 - \hat{p}_1)}{c_1} +
                \frac{\hat{p}_2 (1 - \hat{p}_2)}{c_2}
            }
        }

    The p-value is then computed as:

    .. math::

        \sum
            \binom{c_1}{x_{11}}
            \binom{c_2}{x_{12}}
            \pi^{x_{11} + x_{12}}
            (1 - \pi)^{t - x_{11} - x_{12}}

    where the sum is over all  2x2 contingency tables :math:`X` such that:
    * :math:`T(X) \leq T(X_0)` when `alternative` = "less",
    * :math:`T(X) \geq T(X_0)` when `alternative` = "greater", or
    * :math:`T(X) \geq |T(X_0)|` when `alternative` = "two-sided".
    Above, :math:`c_1, c_2` are the sum of the columns 1 and 2,
    and :math:`t` the total (sum of the 4 sample's element).

    The returned p-value is the maximum p-value taken over the nuisance
    parameter :math:`\pi`, where :math:`0 \leq \pi \leq 1`.

    This function's complexity is :math:`O(n c_1 c_2)`, where `n` is the
    number of sample points.

    References
    ----------
    .. [1] Barnard, G. A. "Significance Tests for 2x2 Tables". *Biometrika*.
           34.1/2 (1947): 123-138. :doi:`dpgkg3`

    .. [2] Mehta, Cyrus R., and Pralay Senchaudhuri. "Conditional versus
           unconditional exact tests for comparing two binomials."
           *Cytel Software Corporation* 675 (2003): 1-5.

    .. [3] "Wald Test". *Wikipedia*. https://en.wikipedia.org/wiki/Wald_test

    Examples
    --------
    An example use of Barnard's test is presented in [2]_.

        Consider the following example of a vaccine efficacy study
        (Chan, 1998). In a randomized clinical trial of 30 subjects, 15 were
        inoculated with a recombinant DNA influenza vaccine and the 15 were
        inoculated with a placebo. Twelve of the 15 subjects in the placebo
        group (80%) eventually became infected with influenza whereas for the
        vaccine group, only 7 of the 15 subjects (47%) became infected. The
        data are tabulated as a 2 x 2 table::

                Vaccine  Placebo
            Yes     7        12
            No      8        3

    When working with statistical hypothesis testing, we usually use a
    threshold probability or significance level upon which we decide
    to reject the null hypothesis :math:`H_0`. Suppose we choose the common
    significance level of 5%.

    Our alternative hypothesis is that the vaccine will lower the chance of
    becoming infected with the virus; that is, the probability :math:`p_1` of
    catching the virus with the vaccine will be *less than* the probability
    :math:`p_2` of catching the virus without the vaccine.  Therefore, we call
    `barnard_exact` with the ``alternative="less"`` option:

    >>> import scipy.stats as stats
    >>> res = stats.barnard_exact([[7, 12], [8, 3]], alternative="less")
    >>> res.statistic
    -1.894...
    >>> res.pvalue
    0.03407...

    Under the null hypothesis that the vaccine will not lower the chance of
    becoming infected, the probability of obtaining test results at least as
    extreme as the observed data is approximately 3.4%. Since this p-value is
    less than our chosen significance level, we have evidence to reject
    :math:`H_0` in favor of the alternative.

    Suppose we had used Fisher's exact test instead:

    >>> _, pvalue = stats.fisher_exact([[7, 12], [8, 3]], alternative="less")
    >>> pvalue
    0.0640...

    With the same threshold significance of 5%, we would not have been able
    to reject the null hypothesis in favor of the alternative. As stated in
    [2]_, Barnard's test is uniformly more powerful than Fisher's exact test
    because Barnard's test does not condition on any margin. Fisher's test
    should only be used when both sets of marginals are fixed.

    r   6Number of points `n` must be strictly positive, found r   r!   r!   *The input `table` must be of shape (2, 2).*All values in `table` must be nonnegative.r+   r-   r   r)   rR   rT   rS   Nr   r   r   r   rO   rU   rd   zG`alternative` should be one of {'two-sided', 'less', 'greater'}, found r   sobolr   ZboundsrF   Zsampling_methodZa_minZa_max)r1   r.   r/   int64r   r5   r\   r   r   rY   r7   rZ   rT   rW   r[   r   r   -_get_binomial_log_p_value_with_nuisance_paramclipru   fun)r   rQ   ZpooledrF   total_col_1total_col_2rb   rc   p1p2rL   Z	variancesZwald_statisticZwald_stat_obs	index_arrmsg	x1_sum_x2x1_log_combx2_log_combx1_sum_x2_log_combresultp_valuerM   rM   rN   r     sd     ?
 6





r   c                   @   s   e Zd ZU eed< eed< dS )BoschlooExactResultr   r    Nr   rM   rM   rM   rN   r     s   
r   c                 C   s  t j}|dkrtd|tj| tjd} | jdks>tdt| dk rTtdd| jddv rrt	tj
tj
S | jdd\}}|| }tj|d tjddd	}tj|d tjdd	d}|| }	|d
kr||||	|j}
n|dkr||||	|j}
nv|dkrbt| d
|d}t| d|d}|j|jk r<|n|}tjd|j ddd}t	|j|S dd d|}t||
| d | d f }|
|d k}|j|j|	j  }}}	t|}t|}|| ||  }tt|	||fd|dd}tjt|j ddd}t	||S )a  Perform Boschloo's exact test on a 2x2 contingency table.

    Parameters
    ----------
    table : array_like of ints
        A 2x2 contingency table.  Elements should be non-negative integers.

    alternative : {'two-sided', 'less', 'greater'}, optional
        Defines the null and alternative hypotheses. Default is 'two-sided'.
        Please see explanations in the Notes section below.

    n : int, optional
        Number of sampling points used in the construction of the sampling
        method. Note that this argument will automatically be converted to
        the next higher power of 2 since `scipy.stats.qmc.Sobol` is used to
        select sample points. Default is 32. Must be positive. In most cases,
        32 points is enough to reach good precision. More points comes at
        performance cost.

    Returns
    -------
    ber : BoschlooExactResult
        A result object with the following attributes.

        statistic : float
            The statistic used in Boschloo's test; that is, the p-value
            from Fisher's exact test.

        pvalue : float
            P-value, the probability of obtaining a distribution at least as
            extreme as the one that was actually observed, assuming that the
            null hypothesis is true.

    See Also
    --------
    chi2_contingency : Chi-square test of independence of variables in a
        contingency table.
    fisher_exact : Fisher exact test on a 2x2 contingency table.
    barnard_exact : Barnard's exact test, which is a more powerful alternative
        than Fisher's exact test for 2x2 contingency tables.

    Notes
    -----
    Boschloo's test is an exact test used in the analysis of contingency
    tables. It examines the association of two categorical variables, and
    is a uniformly more powerful alternative to Fisher's exact test
    for 2x2 contingency tables.

    Boschloo's exact test uses the p-value of Fisher's exact test as a
    statistic, and Boschloo's p-value is the probability under the null
    hypothesis of observing such an extreme value of this statistic.

    Let's define :math:`X_0` a 2x2 matrix representing the observed sample,
    where each column stores the binomial experiment, as in the example
    below. Let's also define :math:`p_1, p_2` the theoretical binomial
    probabilities for  :math:`x_{11}` and :math:`x_{12}`. When using
    Boschloo exact test, we can assert three different alternative hypotheses:

    - :math:`H_0 : p_1=p_2` versus :math:`H_1 : p_1 < p_2`,
      with `alternative` = "less"

    - :math:`H_0 : p_1=p_2` versus :math:`H_1 : p_1 > p_2`,
      with `alternative` = "greater"

    - :math:`H_0 : p_1=p_2` versus :math:`H_1 : p_1 \neq p_2`,
      with `alternative` = "two-sided" (default)

    There are multiple conventions for computing a two-sided p-value when the
    null distribution is asymmetric. Here, we apply the convention that the
    p-value of a two-sided test is twice the minimum of the p-values of the
    one-sided tests (clipped to 1.0). Note that `fisher_exact` follows a
    different convention, so for a given `table`, the statistic reported by
    `boschloo_exact` may differ from the p-value reported by `fisher_exact`
    when ``alternative='two-sided'``.

    .. versionadded:: 1.7.0

    References
    ----------
    .. [1] R.D. Boschloo. "Raised conditional level of significance for the
       2 x 2-table when testing the equality of two probabilities",
       Statistica Neerlandica, 24(1), 1970

    .. [2] "Boschloo's test", Wikipedia,
       https://en.wikipedia.org/wiki/Boschloo%27s_test

    .. [3] Lise M. Saari et al. "Employee attitudes and job satisfaction",
       Human Resource Management, 43(4), 395-407, 2004,
       :doi:`10.1002/hrm.20032`.

    Examples
    --------
    In the following example, we consider the article "Employee
    attitudes and job satisfaction" [3]_
    which reports the results of a survey from 63 scientists and 117 college
    professors. Of the 63 scientists, 31 said they were very satisfied with
    their jobs, whereas 74 of the college professors were very satisfied
    with their work. Is this significant evidence that college
    professors are happier with their work than scientists?
    The following table summarizes the data mentioned above::

                         college professors   scientists
        Very Satisfied   74                     31
        Dissatisfied     43                     32

    When working with statistical hypothesis testing, we usually use a
    threshold probability or significance level upon which we decide
    to reject the null hypothesis :math:`H_0`. Suppose we choose the common
    significance level of 5%.

    Our alternative hypothesis is that college professors are truly more
    satisfied with their work than scientists. Therefore, we expect
    :math:`p_1` the proportion of very satisfied college professors to be
    greater than :math:`p_2`, the proportion of very satisfied scientists.
    We thus call `boschloo_exact` with the ``alternative="greater"`` option:

    >>> import scipy.stats as stats
    >>> res = stats.boschloo_exact([[74, 31], [43, 32]], alternative="greater")
    >>> res.statistic
    0.0483...
    >>> res.pvalue
    0.0355...

    Under the null hypothesis that scientists are happier in their work than
    college professors, the probability of obtaining test
    results at least as extreme as the observed data is approximately 3.55%.
    Since this p-value is less than our chosen significance level, we have
    evidence to reject :math:`H_0` in favor of the alternative hypothesis.

    r   r   r   r   r   r   r+   r   r)   rU   rd   rO   )rQ   rF   r!   r   z`alternative` should be one of )rO   rU   rd   z, found r   r   g    ?r   r   r   )r   	hypergeomr1   r.   r/   r   r   r5   r\   r   r   rY   r7   r   r:   r   r    r   r   r   r   r   ru   r   )r   rQ   rF   r   r   r   totalrb   rc   r   pvaluesZboschloo_lessZboschloo_greaterr   r    r   Zfisher_statr   r   r   r   r   r   rM   rM   rN   r     sh     



r   c                 C   sT  |j \}}|| d }tjddd tj| t| | dkd}tjd|  t| d|  dkd}|| }	d|	|dkddddf < |||  }
d|
||kddddf < ||	 |
 }W d   n1 s0    Y  || }| }tjdddF t||  }|tj|t|tj	 |dkd }W d   n1 sD0    Y  | S )a*  
    Compute the log pvalue in respect of a nuisance parameter considering
    a 2x2 sample space.

    Parameters
    ----------
    nuisance_param : float
        nuisance parameter used in the computation of the maximisation of
        the p-value. Must be between 0 and 1

    x1_sum_x2 : ndarray
        Sum of x1 and x2 inside barnard_exact

    x1_sum_x2_log_comb : ndarray
        sum of the log combination of x1 and x2

    index_arr : ndarray of boolean

    Returns
    -------
    p_value : float
        Return the maximum p-value considering every nuisance parameter
        between 0 and 1

    Notes
    -----

    Both Barnard's test and Boschloo's test iterate over a nuisance parameter
    :math:`\pi \in [0, 1]` to find the maximum p-value. To search this
    maxima, this function return the negative log pvalue with respect to the
    nuisance parameter passed in params. This negative log p-value is then
    used in `shgo` to find the minimum negative pvalue which is our maximum
    pvalue.

    Also, to compute the different combination used in the
    p-values' computation formula, this function uses `gammaln` which is
    more tolerant for large value than `scipy.special.comb`. `gammaln` gives
    a log combination. For the little precision loss, performances are
    improved a lot.
    r!   rR   r   r   )outwherer   N)
r   r.   rZ   logr   r?   ru   r\   Z	full_likeinf)Znuisance_paramr   r   r   t1t2rF   Zlog_nuisanceZlog_1_minus_nuisanceZnuisance_power_x1_x2Znuisance_power_n_minus_x1_x2Ztmp_log_values_arrZtmp_values_from_indexZ	max_valueZ	log_probsZ
log_pvaluerM   rM   rN   r   w  sB    +

 (r   c                    s  t ||}|| }|| }|| }|d ||  d|  |d| d    d|d   }|d ||  }t|| |}	t||	}
t |
 t jdgdgg dg fddt|D  }t|d D ]}g }t jd	 d}t|D ]\}}t j	|d |d d
d\}}}t 
t ||d|f |d|f  gt ||dt ||dgd}|| ||  d }|d  | 7  < || q|}q|| \}}t t |||k |	 S )u  
    Compute the exact p-value of the Cramer-von Mises two-sample test
    for a given value s of the test statistic.
    m and n are the sizes of the samples.

    [1] Y. Xiao, A. Gordon, and A. Yakovlev, "A C++ Program for
        the Cramér-Von Mises Two-Sample Test", J. Stat. Soft.,
        vol. 17, no. 8, pp. 1-15, Dec. 2006.
    [2] T. W. Anderson "On the Distribution of the Two-Sample Cramer-von Mises
        Criterion," The Annals of Mathematical Statistics, Ann. Math. Statist.
        33(3), 1148-1159, (September, 1962)
    r!      r"   r   r   r   c                    s   g | ]}t jd  dqS )r!   r   r   )r.   empty).0_r   rM   rN   
<listcomp>      z)_pval_cvm_2samp_exact.<locals>.<listcomp>r   T)Zreturn_indices)r.   lcmr   r?   Zmin_scalar_typer   r   r   	enumerateZintersect1dconcatenatestackdeleter   appendr   r\   )sr   rF   r   arx   ZmnzetaZ
zeta_boundr   Zmax_gsgsr   Znext_gstmpvgviZi0i1r   valuefreqrM   r   rN   _pval_cvm_2samp_exact  s<    4

 r  autoc              
   C   s  t t | }t t |}|jdks4|jdkr<td|dvrLtdt|}t|}|dkr|t||dkrxd}nd}t ||g}tj	j
|d	d
}|d| }	||d }
|t |	t d|d  d  }||t |
t d|d  d  7 }|| ||  }}|||  d| d d|   }|dkrDt|||}ndd|  d }|d d| | d|d |d    d|   }|d|d  d |  }d|| t d|   }|dk rd}ntddt| }t||dS )u  Perform the two-sample Cramér-von Mises test for goodness of fit.

    This is the two-sample version of the Cramér-von Mises test ([1]_):
    for two independent samples :math:`X_1, ..., X_n` and
    :math:`Y_1, ..., Y_m`, the null hypothesis is that the samples
    come from the same (unspecified) continuous distribution.

    Parameters
    ----------
    x : array_like
        A 1-D array of observed values of the random variables :math:`X_i`.
    y : array_like
        A 1-D array of observed values of the random variables :math:`Y_i`.
    method : {'auto', 'asymptotic', 'exact'}, optional
        The method used to compute the p-value, see Notes for details.
        The default is 'auto'.

    Returns
    -------
    res : object with attributes
        statistic : float
            Cramér-von Mises statistic.
        pvalue : float
            The p-value.

    See Also
    --------
    cramervonmises, anderson_ksamp, epps_singleton_2samp, ks_2samp

    Notes
    -----
    .. versionadded:: 1.7.0

    The statistic is computed according to equation 9 in [2]_. The
    calculation of the p-value depends on the keyword `method`:

    - ``asymptotic``: The p-value is approximated by using the limiting
      distribution of the test statistic.
    - ``exact``: The exact p-value is computed by enumerating all
      possible combinations of the test statistic, see [2]_.

    If ``method='auto'``, the exact approach is used
    if both samples contain equal to or less than 20 observations,
    otherwise the asymptotic distribution is used.

    If the underlying distribution is not continuous, the p-value is likely to
    be conservative (Section 6.2 in [3]_). When ranking the data to compute
    the test statistic, midranks are used if there are ties.

    References
    ----------
    .. [1] https://en.wikipedia.org/wiki/Cramer-von_Mises_criterion
    .. [2] Anderson, T.W. (1962). On the distribution of the two-sample
           Cramer-von-Mises criterion. The Annals of Mathematical
           Statistics, pp. 1148-1159.
    .. [3] Conover, W.J., Practical Nonparametric Statistics, 1971.

    Examples
    --------

    Suppose we wish to test whether two samples generated by
    ``scipy.stats.norm.rvs`` have the same distribution. We choose a
    significance level of alpha=0.05.

    >>> import numpy as np
    >>> from scipy import stats
    >>> rng = np.random.default_rng()
    >>> x = stats.norm.rvs(size=100, random_state=rng)
    >>> y = stats.norm.rvs(size=70, random_state=rng)
    >>> res = stats.cramervonmises_2samp(x, y)
    >>> res.statistic, res.pvalue
    (0.29376470588235293, 0.1412873014573014)

    The p-value exceeds our chosen significance level, so we do not
    reject the null hypothesis that the observed samples are drawn from the
    same distribution.

    For small sample sizes, one can compute the exact p-values:

    >>> x = stats.norm.rvs(size=7, random_state=rng)
    >>> y = stats.t.rvs(df=2, size=6, random_state=rng)
    >>> res = stats.cramervonmises_2samp(x, y, method='exact')
    >>> res.statistic, res.pvalue
    (0.197802197802198, 0.31643356643356646)

    The p-value based on the asymptotic distribution is a good approximation
    even though the sample size is small.

    >>> res = stats.cramervonmises_2samp(x, y, method='asymptotic')
    >>> res.statistic, res.pvalue
    (0.197802197802198, 0.2966041181527128)

    Independent of the method, one would not reject the null hypothesis at the
    chosen significance level in this example.

    r   z/x and y must contain at least two observations.)r  exact
asymptoticz0method must be either auto, exact or asymptotic.r     r  r  Zaverage)methodNr!   r"   r   rz   -   gUUUUUU?g~jth?r-   r   r   )r.   r   r/   r   r1   r0   r?   r   r   r   Zrankdatar\   rY   r  rW   r   rh   )rA   rB   r  ZxaZyarD   rE   rw   rJ   rxZryr   r   NrC   rL   etvttnrM   rM   rN   r     s<    c"& 
0
r   c                   @   s*   e Zd ZdZdd Zdd Zd
ddZd	S )TukeyHSDResulta  Result of `scipy.stats.tukey_hsd`.

    Attributes
    ----------
    statistic : float ndarray
        The computed statistic of the test for each comparison. The element
        at index ``(i, j)`` is the statistic for the comparison between groups
        ``i`` and ``j``.
    pvalue : float ndarray
        The associated p-value from the studentized range distribution. The
        element at index ``(i, j)`` is the p-value for the comparison
        between groups ``i`` and ``j``.

    Notes
    -----
    The string representation of this object displays the most recently
    calculated confidence interval, and if none have been previously
    calculated, it will evaluate ``confidence_interval()``.

    References
    ----------
    .. [1] NIST/SEMATECH e-Handbook of Statistical Methods, "7.4.7.1. Tukey's
           Method."
           https://www.itl.nist.gov/div898/handbook/prc/section4/prc471.htm,
           28 November 2020.
    c                 C   s.   || _ || _|| _|| _|| _d | _d | _d S ri   )r   r    _ntreatments_nobs
_stand_err_ci_ci_cl)rj   r   r    r  r  r  rM   rM   rN   rk     s    zTukeyHSDResult.__init__c                 C   s   | j d u r| jdd d| jd dd}|d7 }t| jjd D ]~}t| jjd D ]h}||krV|d	| d
| d| j||f d| j||f d| j j||f d| j j||f dd
7 }qVqB|S )Nffffff?)confidence_levelz(Tukey's HSD Pairwise Group Comparisons (d   z.1fz% Confidence Interval)
z3Comparison  Statistic  p-value  Lower CI  Upper CI
r   z (z - z) z>10.3f
)	r  confidence_intervalr  r   r    r   r   lowhigh)rj   r  ir   rM   rM   rN   __str__  s"    

 zTukeyHSDResult.__str__r  c                 C   s   | j dur$| jdur$|| jkr$| j S d|  k r8dk sBn td|| j| j| j f}tjj| }|| j }| j	| }| j	| }t
||d| _ || _| j S )a3  Compute the confidence interval for the specified confidence level.

        Parameters
        ----------
        confidence_level : float, optional
            Confidence level for the computed confidence interval
            of the estimated proportion. Default is .95.

        Returns
        -------
        ci : ``ConfidenceInterval`` object
            The object has attributes ``low`` and ``high`` that hold the
            lower and upper bounds of the confidence intervals for each
            comparison. The high and low values are accessible for each
            comparison at index ``(i, j)`` between groups ``i`` and ``j``.

        References
        ----------
        .. [1] NIST/SEMATECH e-Handbook of Statistical Methods, "7.4.7.1.
               Tukey's Method."
               https://www.itl.nist.gov/div898/handbook/prc/section4/prc471.htm,
               28 November 2020.

        Examples
        --------
        >>> from scipy.stats import tukey_hsd
        >>> group0 = [24.5, 23.5, 26.4, 27.1, 29.9]
        >>> group1 = [28.4, 34.2, 29.5, 32.2, 30.1]
        >>> group2 = [26.1, 28.3, 24.3, 26.2, 27.8]
        >>> result = tukey_hsd(group0, group1, group2)
        >>> ci = result.confidence_interval()
        >>> ci.low
        array([[-3.649159, -8.249159, -3.909159],
               [ 0.950841, -3.649159,  0.690841],
               [-3.389159, -7.989159, -3.649159]])
        >>> ci.high
        array([[ 3.649159, -0.950841,  3.389159],
               [ 8.249159,  3.649159,  7.989159],
               [ 3.909159, -0.690841,  3.649159]])
        Nr   r   z)Confidence level must be between 0 and 1.)r#  r$  )r  r  r1   r  r  r   studentized_rangerX   r  r   r	   )rj   r  paramsZsrdZtukey_criterionZ
upper_confZ
lower_confrM   rM   rN   r"    s    +


z"TukeyHSDResult.confidence_intervalN)r  )rn   rp   rq   __doc__rk   r&  r"  rM   rM   rM   rN   r    s   	r  c                 C   sj   t | dk rtddd | D } | D ]>}|jdkr<td|jdkrNtdt| r&tdq&| S )	Nr!   z$There must be more than 1 treatment.c                 S   s   g | ]}t |qS rM   )r.   r/   r   argrM   rM   rN   r      r   z!_tukey_hsd_iv.<locals>.<listcomp>r   z&Input samples must be one-dimensional.z+Input sample size must be greater than one.zInput samples must be finite.)r0   r1   r4   r   r.   isinfr5   )r   r+  rM   rM   rN   _tukey_hsd_iv  s    


r-  c                  G   s   t | } t| }tdd | D }tdd | D }t|}tdd | D |d  ||  }t|jdkrd|d  }nd| d|d j  }t|| d }|d j| }t	|| }	|	||| f}
t
jj|
 }t|||||S )	a  Perform Tukey's HSD test for equality of means over multiple treatments.

    Tukey's honestly significant difference (HSD) test performs pairwise
    comparison of means for a set of samples. Whereas ANOVA (e.g. `f_oneway`)
    assesses whether the true means underlying each sample are identical,
    Tukey's HSD is a post hoc test used to compare the mean of each sample
    to the mean of each other sample.

    The null hypothesis is that the distributions underlying the samples all
    have the same mean. The test statistic, which is computed for every
    possible pairing of samples, is simply the difference between the sample
    means. For each pair, the p-value is the probability under the null
    hypothesis (and other assumptions; see notes) of observing such an extreme
    value of the statistic, considering that many pairwise comparisons are
    being performed. Confidence intervals for the difference between each pair
    of means are also available.

    Parameters
    ----------
    sample1, sample2, ... : array_like
        The sample measurements for each group. There must be at least
        two arguments.

    Returns
    -------
    result : `~scipy.stats._result_classes.TukeyHSDResult` instance
        The return value is an object with the following attributes:

        statistic : float ndarray
            The computed statistic of the test for each comparison. The element
            at index ``(i, j)`` is the statistic for the comparison between
            groups ``i`` and ``j``.
        pvalue : float ndarray
            The computed p-value of the test for each comparison. The element
            at index ``(i, j)`` is the p-value for the comparison between
            groups ``i`` and ``j``.

        The object has the following methods:

        confidence_interval(confidence_level=0.95):
            Compute the confidence interval for the specified confidence level.

    See Also
    --------
    dunnett : performs comparison of means against a control group.

    Notes
    -----
    The use of this test relies on several assumptions.

    1. The observations are independent within and among groups.
    2. The observations within each group are normally distributed.
    3. The distributions from which the samples are drawn have the same finite
       variance.

    The original formulation of the test was for samples of equal size [6]_.
    In case of unequal sample sizes, the test uses the Tukey-Kramer method
    [4]_.

    References
    ----------
    .. [1] NIST/SEMATECH e-Handbook of Statistical Methods, "7.4.7.1. Tukey's
           Method."
           https://www.itl.nist.gov/div898/handbook/prc/section4/prc471.htm,
           28 November 2020.
    .. [2] Abdi, Herve & Williams, Lynne. (2021). "Tukey's Honestly Significant
           Difference (HSD) Test."
           https://personal.utdallas.edu/~herve/abdi-HSD2010-pretty.pdf
    .. [3] "One-Way ANOVA Using SAS PROC ANOVA & PROC GLM." SAS
           Tutorials, 2007, www.stattutorials.com/SAS/TUTORIAL-PROC-GLM.htm.
    .. [4] Kramer, Clyde Young. "Extension of Multiple Range Tests to Group
           Means with Unequal Numbers of Replications." Biometrics, vol. 12,
           no. 3, 1956, pp. 307-310. JSTOR, www.jstor.org/stable/3001469.
           Accessed 25 May 2021.
    .. [5] NIST/SEMATECH e-Handbook of Statistical Methods, "7.4.3.3.
           The ANOVA table and tests of hypotheses about means"
           https://www.itl.nist.gov/div898/handbook/prc/section4/prc433.htm,
           2 June 2021.
    .. [6] Tukey, John W. "Comparing Individual Means in the Analysis of
           Variance." Biometrics, vol. 5, no. 2, 1949, pp. 99-114. JSTOR,
           www.jstor.org/stable/3001913. Accessed 14 June 2021.


    Examples
    --------
    Here are some data comparing the time to relief of three brands of
    headache medicine, reported in minutes. Data adapted from [3]_.

    >>> import numpy as np
    >>> from scipy.stats import tukey_hsd
    >>> group0 = [24.5, 23.5, 26.4, 27.1, 29.9]
    >>> group1 = [28.4, 34.2, 29.5, 32.2, 30.1]
    >>> group2 = [26.1, 28.3, 24.3, 26.2, 27.8]

    We would like to see if the means between any of the groups are
    significantly different. First, visually examine a box and whisker plot.

    >>> import matplotlib.pyplot as plt
    >>> fig, ax = plt.subplots(1, 1)
    >>> ax.boxplot([group0, group1, group2])
    >>> ax.set_xticklabels(["group0", "group1", "group2"]) # doctest: +SKIP
    >>> ax.set_ylabel("mean") # doctest: +SKIP
    >>> plt.show()

    From the box and whisker plot, we can see overlap in the interquartile
    ranges group 1 to group 2 and group 3, but we can apply the ``tukey_hsd``
    test to determine if the difference between means is significant. We
    set a significance level of .05 to reject the null hypothesis.

    >>> res = tukey_hsd(group0, group1, group2)
    >>> print(res)
    Tukey's HSD Pairwise Group Comparisons (95.0% Confidence Interval)
    Comparison  Statistic  p-value   Lower CI   Upper CI
    (0 - 1)     -4.600      0.014     -8.249     -0.951
    (0 - 2)     -0.260      0.980     -3.909      3.389
    (1 - 0)      4.600      0.014      0.951      8.249
    (1 - 2)      4.340      0.020      0.691      7.989
    (2 - 0)      0.260      0.980     -3.389      3.909
    (2 - 1)     -4.340      0.020     -7.989     -0.691

    The null hypothesis is that each group has the same mean. The p-value for
    comparisons between ``group0`` and ``group1`` as well as ``group1`` and
    ``group2`` do not exceed .05, so we reject the null hypothesis that they
    have the same means. The p-value of the comparison between ``group0``
    and ``group2`` exceeds .05, so we accept the null hypothesis that there
    is not a significant difference between their means.

    We can also compute the confidence interval associated with our chosen
    confidence level.

    >>> group0 = [24.5, 23.5, 26.4, 27.1, 29.9]
    >>> group1 = [28.4, 34.2, 29.5, 32.2, 30.1]
    >>> group2 = [26.1, 28.3, 24.3, 26.2, 27.8]
    >>> result = tukey_hsd(group0, group1, group2)
    >>> conf = res.confidence_interval(confidence_level=.99)
    >>> for ((i, j), l) in np.ndenumerate(conf.low):
    ...     # filter out self comparisons
    ...     if i != j:
    ...         h = conf.high[i,j]
    ...         print(f"({i} - {j}) {l:>6.3f} {h:>6.3f}")
    (0 - 1) -9.480  0.280
    (0 - 2) -5.140  4.620
    (1 - 0) -0.280  9.480
    (1 - 2) -0.540  9.220
    (2 - 0) -4.620  5.140
    (2 - 1) -9.220  0.540
    c                 S   s   g | ]}t |qS rM   )r.   r=   r*  rM   rM   rN   r     r   ztukey_hsd.<locals>.<listcomp>c                 S   s   g | ]
}|j qS rM   )r   )r   r  rM   rM   rN   r     r   c                 S   s   g | ]}t j|d dqS )r   )Zddof)r.   ra   r*  rM   rM   rN   r     r   r   r!   r   N)r-  r0   r.   r/   r\   uniquer   r:   rW   r[   r   r'  r@   r  )r   ZntreatmentsZmeansZnsamples_treatmentsZnobsZmse	normalizeZ	stand_errZmean_differencesZt_statr(  r   rM   rM   rN   r   +  s,     
r   )r%   )N)rM   )rO   )NrO   )rO   Tr   )rO   r   )r  )Bcollectionsr   dataclassesr   mathr   numpyr.   r;   	itertoolsr   r6   r   Zscipy.optimizer    r   _commonr	   Z_continuous_distnsr
   r   Zscipy.specialr   r   r   Z	scipy.fftr   Z_stats_pythranr   r   r   r   r   Z_axis_nan_policyr   r   __all__r   r   r   rV   rh   r   r   r   r   r   r   r   r   r   r   r   r   r   r   r   r   r   r   r  r   r  r-  r   rM   rM   rM   rN   <module>   s~   w :
2$
!s

 8
  
 R[5 }