U
    HvfkO                     @   s  d dl mZmZmZ d dlZd dlmZmZm	Z	m
Z
mZmZ d dlZd dlmZ dd Zdd Zejjd	d
 Zejjdd Zdd Zdd ZG dd dejZG dd dejZG dd dejZdd Zdd Zdd Zdd Zdd d!d"d#d$gZ ej!d%e d&d'g ej!d(e d)d* Z"d+d, Z#d-d. Z$d/d0 Z%d1d2 Z&ejj'd3d4 Z(d5d6 Z)ejj'd7d8 Z*d9d: Z+d;d< Z,d=d> Z-d?d@ Z.dAdB Z/dS )C    )statslinalg	integrateN)assert_almost_equalassert_assert_equalassert_array_almost_equalassert_array_almost_equal_nulpassert_allclose)raisesc                  C   sH  t jd d} t j| }| }|jdd}t|}t ddd}|	|}tj
j|||d}|d |d	  }tt || d
 | dk  ||t j}	|t j |}
t|	ddd t|
ddd t||t j|	dd t|t j ||
dd t|||d
  | d
d t|||d
 ||  | d
d d S )N      )Zddof     locZscaler      {Gz?      ?decimal   )nprandomseedrandnmeanZstdr   gaussian_kdelinspaceevaluatenormpdfr   sumintegrate_box_1dinfr   integrate_boxintegrate_kdeintegrate_gaussian)n_basesamplexnxnmeanxnstdgkdexskdepdfnormpdf	intervallprob1prob2 r5   A/tmp/pip-unpacked-wheel-96ln3f52/scipy/stats/tests/test_kdeoth.pytest_kde_1d	   s2    


  r7   c                  C   sn  t jd d} t j| }t j| }t j||d}t t j|| d |d}tj||d}t 	ddd}|
|}tjj|||d}|d	 |d
  }	tt || d |	 dk  ||t j}
|t j |}t|
dd	d t|dd	d t||t j|
dd t|t j ||dd t|||d  |	 dd t|||d ||  |	 dd d S )Nr   r   weightsr   r   r   r   r   r   r   r   r   r   r   )r   r   r   r   randZaveragesqrtr   r   r    r!   r"   r#   r   r$   r%   r&   r   r'   r(   r)   )r*   r+   wnr,   r-   r.   r/   r0   r1   r2   r3   r4   r5   r5   r6   test_kde_1d_weighted(   s4    

  r=   c                  C   s  t jd d} t ddg}t ddgddgg}t jj||| dj}t|}t jdd	d
dd	d
f \}}t 	|
 |
 g}||}|dd}tjjt ||g||d}	|
 d |
 d  }
tt ||	 d |
d  dk  d}d}|||d g||g}|||g||d g}t|ddd t|ddd t|||d  |
d  dd t|||||	  |
d  dd d S )Nr   r         ?      @       @      @sizer   r                @@r   Zcovr   r   r   r   }Ô%I}Ô%ITr   r   )r   r   r   arraymultivariate_normalTr   r   mgridvstackravelr!   reshaper#   dstackr   r$   r'   r   r(   r)   )r*   r   
covariancer+   r.   xygrid_coordsr0   r1   r2   smalllarger3   r4   r5   r5   r6   test_kde_2dH   s6    

"
  rV   c                  C   s  t jd d} t ddg}t ddgddgg}t jj||| dj}t j| }tj||d}t j	d	d
dd	d
df \}}t 
| | g}||}	|	dd}	tjjt ||g||d}
| d | d  }tt |	|
 d |d  dk  d}d}|||d g||g}|||g||d g}t|ddd t|ddd t|||	d  |d  dd t||||	|
  |d  dd d S )Nr   r   r>   r?   r@   rA   rB   r8   r   r   rD   rE   r   r   r   r   rF   rG   r   r   )r   r   r   rH   rI   rJ   r:   r   r   rK   rL   rM   r!   rN   r#   rO   r   r$   r'   r   r(   r)   )r*   r   rP   r+   r<   r.   rQ   rR   rS   r0   r1   r2   rT   rU   r3   r4   r5   r5   r6   test_kde_2d_weightedo   s8    
"
  rW   c            
      C   s   dd } t jd d}t j|}t|}tj|| d}tj||jd}t ddd}||}||}t	|| ||}	t	||	 t
ttj|d	d d S )
Nc                 S   s   t | jd| jd  S z*Same as default, just check that it works.g         )r   powerndZkde_objr5   r5   r6   scotts_factor   s    z0test_kde_bandwidth_method.<locals>.scotts_factorr   2   	bw_methodr   r   3   wrongstringr   r   r   r   r   r   factorr    r!   r   assert_raises
ValueError
r^   r*   r+   r.   Zgkde2Zgkde3r/   r0   Zkdepdf2Zkdepdf3r5   r5   r6   test_kde_bandwidth_method   s    





ri   c            
      C   s   dd } t jd d}t j|}t|}tj|| d}tj||jd}t ddd}||}||}t	|| ||}	t	||	 t
ttj|d	d d S )
Nc                 S   s   t | jd| jd  S rX   )r   rZ   Zneffr\   r]   r5   r5   r6   r^      s    z9test_kde_bandwidth_method_weighted.<locals>.scotts_factorr   r_   r`   r   r   rb   rc   rd   rh   r5   r5   r6   "test_kde_bandwidth_method_weighted   s    





rj   c                   @   s   e Zd Zdd ZdS )_kde_subclass1c                 C   s0   t || _| jj\| _| _| j| _|   d S N)	r   Z
atleast_2ddatasetshaper\   r[   r^   covariance_factor_compute_covarianceselfrm   r5   r5   r6   __init__   s    z_kde_subclass1.__init__N)__name__
__module____qualname__rs   r5   r5   r5   r6   rk      s   rk   c                       s   e Zd Z fddZ  ZS )_kde_subclass2c                    s   | j | _t | d S rl   )r^   ro   superrs   rq   	__class__r5   r6   rs      s    z_kde_subclass2.__init__)rt   ru   rv   rs   __classcell__r5   r5   ry   r6   rw      s   rw   c                   @   s   e Zd Zdd ZdS )_kde_subclass4c                 C   s   d|    S )Nr   )silverman_factor)rr   r5   r5   r6   ro      s    z _kde_subclass4.covariance_factorN)rt   ru   rv   ro   r5   r5   r5   r6   r|      s   r|   c                     s   t jdddddgtd} t jddd	d
}t|   |}t| }||}t||dd t| }||}t||dd t	| }|| }dddddg}	t
|	|dd  }
 fdd|
_|
  |
|}t||dd d S )Nr   r   rY      dtype
   r_   numZnulpgn,?gǻe??gW[3?ga )?gKd8;?   r   c                      s    j S rl   )re   r5   kder5   r6   <lambda>       z/test_gaussian_kde_subclassing.<locals>.<lambda>)r   rH   floatr    r   r   rk   r	   rw   r|   r   ro   rp   )x1r/   ZysZkde1y1kde2y2Zkde4Zy4
y_expectedZkde5Zy5r5   r   r6   test_gaussian_kde_subclassing   s&    
r   c                  C   sr   t jdddddgtd} t jdddd	}d
ddddg}t| }|jdd |jdd ||}t||dd d S )Nr   r~   r   rY   r   r   r   r   r   g>L\9?gp4=?gH꟫?g8(H	MT?gĲCR?r   r`   scottr   r   )r   rH   r   r    r   r   Zset_bandwidthr   )r   r/   r   r   r   r5   r5   r6   $test_gaussian_kde_covariance_caching  s    
r   c                  C   sr   t jdddddgtd} t jddd	d
}t| }|j|_|  ||}tj| dd}||}t	||dd dS )zUgly, but people may rely on this.  See scipy pull request 123,
    specifically the linked ML thread "Width of the Gaussian in stats.kde".
    If it is necessary to break this later on, that is to be discussed on ML.
    r   r~   r   rY   r   r   r   r   r_   r   	silvermanr`   r   N)
r   rH   r   r    r   r   r}   ro   rp   r	   )r   r/   r   r   r   r   r5   r5   r6   test_gaussian_kde_monkeypatch  s    
r   c                  C   s8   t d} t| }dddddg}t|| |dd dS )zRegression test for #1181.r   gB\A?gES?g
f?r   r   N)r   aranger   r   r   )r   r   r   r5   r5   r6   test_kde_integer_input+  s    

r   Zfloat32float64Zfloat96Zfloat128Zint32Zint64bw_typer   r   r   c                 C   s   t t| d } |dkr|}nt t|d }|r2|dnd }tdd | |fD rTt  tjd| d}tjd| d}tj|||d}tjd| d}||}|jt	||t
||jkstd S )N)r   r      c                 s   s   | ]}|d kV  qd S rl   r5   ).0dtr5   r5   r6   	<genexpr>A  s     z(test_kde_output_dtype.<locals>.<genexpr>r   r   )ra   r9   )getattrr   anypytestskipr   r   r   r   Zresult_typer   re   AssertionError)r   r   Zbwr9   rm   kpointsresultr5   r5   r6   test_kde_output_dtype5  s    r   c               	   C   sV   t jd} | d}t|}| d}d}tjt|d |	| W 5 Q R X d S )Nl	   Fgu	\U.lt&0 )r   r   )r   r   z0points have dimension 3, dataset has dimension 2match)
r   r   default_rngZstandard_normalr   r   r   r   rg   logpdf)rngr+   r.   r/   msgr5   r5   r6   test_pdf_logpdf_validationN  s    


r   c                  C   s   t jd d} t j| }t|}t ddd}||}||}t	||dd t 
|}||}t	||dd t|}t 
||}||}t	||dd d S )Nr   r_         r   )r   r   r   r   r   r   r    r!   r#   r   logr   )r*   r+   r.   r/   r#   pdf2r   logpdf2r5   r5   r6   test_pdf_logpdfY  s    






r   c            	      C   s   t jd d} t j| }t j| }tj||d}t ddd}||}|	|}t
||dd t |}||}t
||dd tj|t jt|d}t ||}||}t
||dd d S )Nr   r_   r8   r   r   r   r   )r   r   r   r   r:   r   r   r    r!   r#   r   r   r   len)	r*   r+   r<   r.   r/   r#   r   r   r   r5   r5   r6   test_pdf_logpdf_weightedq  s     




r   c            	         s   t jd} d}d}| j||fd}| j|dfd}t ddddd	d
dddg	 t| }||  } fddfdd}||}t	||dd d S )N   K b1d& r_   r   rB   r   r   r   rY   r   r   r      	   c                    s(    fdd}t |tj tjd S )Nc                    s"   t | g  f} | d S Nr   )r   Zconcatenater#   )rQ   
dimensionsr   pointr5   r6   f  s    z<test_marginal_1_axis.<locals>.marginal_pdf_single.<locals>.fr   )r   Zquadr   r&   r   r   r   r   r   r6   marginal_pdf_single  s    z1test_marginal_1_axis.<locals>.marginal_pdf_singlec                    s   t j d| dS )Nr   ZaxisZarrr   Zapply_along_axis)r   )r   r5   r6   marginal_pdf  s    z*test_marginal_1_axis.<locals>.marginal_pdfư>rtol
r   r   r   normalrH   r   r   marginalr#   r
   	r   n_datan_dimrm   r   r   r#   r   refr5   )r   r   r   r6   test_marginal_1_axis  s    

r   c            	         s   t jd} d}d}| j||fd}| j|dfd}t ddg t| }||  } fdd}||}t	||d	d
 d S )Nr      rY   rB   r   r   c                    s    fdd}t j|d| dS )Nc                    s2    fdd}t |tj tjtj tjd S )Nc                    s,     \}}t ||| |g}|d S r   )r   rH   r#   )rR   rQ   wzr   r5   r6   r     s    zRtest_marginal_2_axis.<locals>.marginal_pdf.<locals>.marginal_pdf_single.<locals>.fr   )r   Zdblquadr   r&   r   r   r   r6   r     s    zGtest_marginal_2_axis.<locals>.marginal_pdf.<locals>.marginal_pdf_singler   r   r   )r   r   r   r5   r6   r     s    z*test_marginal_2_axis.<locals>.marginal_pdfr   r   r   r   r5   r   r6   test_marginal_2_axis  s    


r   c               	   C   s  t jd} d}d}| j||fd}| j|dfd}t|}ddg}||}||| }ddg}	||	}
|
||	 }t|| d	}t	j
t|d
 |ddg W 5 Q R X d}t	j
t|d
 |dddg W 5 Q R X d}t	j
t|d
 |dddg W 5 Q R X d S )Nr   r   rY   rB   r   r   z,Elements of `dimensions` must be integers...r   g      @z,All elements of `dimensions` must be unique.r   z;Dimensions \[-5  6\] are invalid for a distribution in 4...r~   r   )r   r   r   r   r   r   r   r#   r   r   r   rg   )r   r   r   rm   r   r   Zdimensions1Z	marginal1Zpdf1Zdimensions2Z	marginal2r   messager5   r5   r6   test_marginal_iv  s,    



r   c                     s   t jd d} d t  fddtd| D }t|}|t d| }t j	
t |d d t j	
t |d d d S )Nr   i	  i  c                    s   g | ]}t j | qS r5   )r   r   r   )r   r[   Z	n_samplesr5   r6   
<listcomp>  s     z(test_logpdf_overflow.<locals>.<listcomp>r   F)r   r   r   rH   ranger   r   r   r   Ztestingr   Zisneginfisnan)Zn_dimensionsr+   r.   r   r5   r   r6   test_logpdf_overflow  s     

r   c                  C   sb   t jd t jjdd} t jjdddg| jd}| }tjt 	| |d t
||ddd d S )	N90  d   rB   r>   g      $@r8   +=atolr   )r   r   r   Z	lognormalchoicerC   copyr   r   log10r
   )valsr9   Zorig_weightsr5   r5   r6   test_weights_intact  s    r   c                  C   st   t jd dddddg} ddd	d
dg}tj| |d}tj| t |d}dddg}t||||ddd d S )Nr   g?g      +@g      5@g     R@g     X@r   r   rY   r      r8   g333333?   X   r   r   )r   r   r   r   r   r   r
   r!   )valuesr9   Zpdf_iZpdf_fr+   r5   r5   r6   test_weights_integer  s    

  r   c                  C   s   dd } t jd d}t j|}t j|}t|}| | tj||d}| | t ddg}t ddgdd	gg}t jj|||d
j	}t|}	| |	 tj||d}
| |
 d S )Nc                 S   s   d}|  |}|  |}ttt||dd d}| j ||d}| j ||d}t||dd tjjdd}| j ||d}tjjdd}| j ||d}t||dd ttjdrtjd}| j ||d d S )	N   gvIh%<=)r   i?  )r      r   i  )	Zresamplerf   r   r
   r   r   ZRandomStatehasattrr   )Z
gkde_trailZn_sampleZsamp1Zsamp2r   Zrstate1Zrstate2r   r5   r5   r6   test_seed_sub  s,    

    z test_seed.<locals>.test_seed_subr   r   r8   r>   r?   r@   rA   rB   )
r   r   r   r:   r   r   r   rH   rI   rJ   )r   r*   r<   Zxn_1dZgkde_1dZgkde_1d_weightedr   rP   Zxn_2dZgkde_2dZgkde_2d_weightedr5   r5   r6   	test_seed  s     

r   c                  C   s   t jd} t dddg}t dddgdddgdddgg}| ||d	}zt|j W n@ tj	k
r   d
}t
tj	|d t|j W 5 Q R X Y nX d S )Nl   SDG. r   r      rY   r   r   r   i  z:The data appears to lie in a lower-dimensional subspace...r   )r   r   r   rH   rI   r   r   rJ   r   ZLinAlgErrorrf   )r   musigmadatar   r5   r5   r6   %test_singular_data_covariance_gh10205C  s    "r   c               	   C   sT   t jd} | jt dt ddd}d}tjt|d t	
| W 5 Q R X d S )Nl   &8*c r   r   rB   z9Number of dimensions is greater than number of samples...r   )r   r   r   rI   zerosZeyer   r   rg   r   r   )r   Zrvsr   r5   r5   r6   )test_fewer_points_than_dimensions_gh17436R  s
    r   )0Zscipyr   r   r   Znumpyr   Znumpy.testingr   r   r   r   r	   r
   r   r   rf   r7   r=   markZslowrV   rW   ri   rj   r   rk   rw   r|   r   r   r   r   Z_ftypesZparametrizer   r   r   r   r   Zxslowr   r   r   r   r   r   r   r   r5   r5   r5   r6   <module>   sJ     
&
'$
%
2