o
    Eb@@                     @   sx  d dl mZ d dlZd dl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G dd dejZdd Zdd Zdd Zdd  Zg d!Ze
jd"ed#d$g e
jd%ee
jd&ee
jd'ed(d) Z d*d+ Z!d,d- Z"e
jj#d.d/ Z$d0d1 Z%d2d3 Z&d4d5 Z'dS )6    )statsN)assert_almost_equalassert_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?      ?Z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 r1   ?/usr/lib/python3/dist-packages/scipy/stats/tests/test_kdeoth.pytest_kde_1d	   s.   



r3   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+   r,   r-   r.   r/   r0   r1   r1   r2   test_kde_1d_weighted(   s0   


r9   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_coordsr,   r-   r.   smalllarger/   r0   r1   r1   r2   test_kde_2dH   s2   

"

rR   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<   r=   r>   r4   r   r   r@   rA   r   r   r   r   rB   rC   r   r   )r   r   r   rD   rE   rF   r6   r   r   rG   rH   rI   r   rJ   r   rK   r   r    r#   r   r$   r%   )r&   r   rL   r'   r8   r*   rM   rN   rO   r,   r-   r.   rP   rQ   r/   r0   r1   r1   r2   test_kde_2d_weightedo   s4   
"

rS   c            
      C      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      t | jd| jd  S z*Same as default, just check that it works.g         )r   powerndZkde_objr1   r1   r2   scotts_factor      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+   r,   Zkdepdf2Zkdepdf3r1   r1   r2   test_kde_bandwidth_method      





rh   c            
      C   rT   )
Nc                 S   rU   rV   )r   rX   ZneffrZ   r[   r1   r1   r2   r\      r]   z9test_kde_bandwidth_method_weighted.<locals>.scotts_factorr	   r^   r_   r   r   ra   rb   rc   rg   r1   r1   r2   "test_kde_bandwidth_method_weighted   ri   rj   c                   @      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shaperZ   rY   r\   covariance_factor_compute_covarianceselfrn   r1   r1   r2   __init__   s   z_kde_subclass1.__init__N)__name__
__module____qualname__rt   r1   r1   r1   r2   rl          rl   c                       s   e Zd Z fddZ  ZS )_kde_subclass2c                    s   | j | _t | d S rm   )r\   rp   superrt   rr   	__class__r1   r2   rt      s   z_kde_subclass2.__init__)ru   rv   rw   rt   __classcell__r1   r1   r{   r2   ry      s    ry   c                   @   s   e Zd Zdd Zdd ZdS )_kde_subclass3c                 C   s   || _ tj| | d S rm   )rL   r   r   rt   )rs   rn   rL   r1   r1   r2   rt      s   z_kde_subclass3.__init__c                 C   s4   t j| j| _t t jdt j | j | _d S )Nr   )	r   ZlinalginvrL   Zinv_covr7   ZdetZpiZ_norm_factorrs   r1   r1   r2   rq      s   $z"_kde_subclass3._compute_covarianceN)ru   rv   rw   rt   rq   r1   r1   r1   r2   r~      s    r~   c                   @   rk   )_kde_subclass4c                 C   s   d|    S )Nr   )silverman_factorr   r1   r1   r2   rp      s   z _kde_subclass4.covariance_factorN)ru   rv   rw   rp   r1   r1   r1   r2   r      rx   r   c                     s   t jg dtd} t jdddd}t|   |}t| }||}t||dd t| }||}t||dd t	|  j
}||}t||dd t| }	|	| }
g d}t||
d	d
  } fdd|_|  ||}t||dd d S )Nr   r   rW      dtype
   r^   ZnumZnulp)gn,?gǻe??gW[3?ga )?gKd8;?   r   c                      s    j S rm   )rd   r1   kder1   r2   <lambda>  s    z/test_gaussian_kde_subclassing.<locals>.<lambda>)r   rD   floatr   r   r   rl   r   ry   r~   rL   r   r   rp   rq   )x1r+   ZysZkde1y1kde2y2Zkde3Zy3Zkde4Zy4
y_expectedZkde5Zy5r1   r   r2   test_gaussian_kde_subclassing   s,   
r   c                  C   sf   t jg dtd} t jdddd}g d}t| }|jdd	 |jd
d	 ||}t||dd d S )Nr   r   r   r   r   r   )g>L\9?gp4=?gH꟫?g8(H	MT?gĲCR?r   r_   scottr   r   )r   rD   r   r   r   r   Zset_bandwidthr   )r   r+   r   r   r   r1   r1   r2   $test_gaussian_kde_covariance_caching  s   
r   c                  C   sl   t jg d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   r   r^   r   	silvermanr_   r   N)
r   rD   r   r   r   r   r   rp   rq   r   )r   r+   r   r   r   r   r1   r1   r2   test_gaussian_kde_monkeypatch"  s   
r   c                  C   s2   t d} t| }g d}t|| |dd dS )zRegression test for #1181.r   )B\A?筱ES?g
f?r   r   r   r   N)r   aranger   r   r   )r   r   r   r1   r1   r2   test_kde_integer_input7  s   

r   )Zfloat32float64Zfloat96Zfloat128Zint32Zint64bw_typer   r   weights_typedataset_type
point_typec           
      C   s   t t| d } t t|d }t t|d }|dv r|}nt t|d }|r%|dnd }tdd | |||fD r8t  tjd|d}tjd|d}tj|||d}tjd| d}||}	|	jt	||t
||jksjJ d S )N)r   r      c                 s   s    | ]}|d u V  qd S rm   r1   ).0Zdtr1   r1   r2   	<genexpr>Q  s    z(test_kde_output_dtype.<locals>.<genexpr>r   r   )r`   r5   )getattrr   anypytestskipr   r   r   r   Zresult_typer   rd   )
r   r   r   r   Zbwr5   rn   kZpointsresultr1   r1   r2   test_kde_output_dtypeA  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   loglogpdf)r&   r'   r*   r+   r   pdf2r   logpdf2r1   r1   r2   test_pdf_logpdf^  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^   r4   r   r   r   r   )r   r   r   r   r6   r   r   r   r   r   r   r   r   len)	r&   r'   r8   r*   r+   r   r   r   r   r1   r1   r2   test_pdf_logpdf_weightedv  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 r1   )r   r   r   )r   rY   Z	n_samplesr1   r2   
<listcomp>  s    z(test_logpdf_overflow.<locals>.<listcomp>r   F)r   r   r   rD   ranger   r   r   r   ZtestingZassert_equalZisneginfZisnan)Zn_dimensionsr'   r*   r   r1   r   r2   test_logpdf_overflow  s   

r   c                  C   s`   t jd t jjdd} t jjg d| jd}| }tjt 	| |d t
||ddd d S )N90  d   r>   )r:   g      $@r   r4   +=atolZrtol)r   r   r   Z	lognormalchoicer?   copyr   r   Zlog10r   )Zvalsr5   Zorig_weightsr1   r1   r2   test_weights_intact  s   r   c                  C   sf   t jd g d} g d}tj| |d}tj| t |d}g d}t||||ddd d S )Nr   )g?g      +@g      5@g     R@g     X@)r   r   rW         r4   )g333333?   X   r   r   )r   r   r   r   r   r   r   r   )valuesr5   Zpdf_iZpdf_fr'   r1   r1   r2   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rdtjd}| j ||d d S d S )	N   gvIh%<=)r   i?  )r      default_rngi  )	Zresamplere   AssertionErrorr   r   r   ZRandomStatehasattrr   )Z
gkde_trailZn_sampleZsamp1Zsamp2r   Zrstate1Zrstate2rngr1   r1   r2   test_seed_sub  s&   


z test_seed.<locals>.test_seed_subr	   r
   r4   r:   r;   r<   r=   r>   )
r   r   r   r6   r   r   r   rD   rE   rF   )r   r&   r8   Zxn_1dZgkde_1dZgkde_1d_weightedr   rL   Zxn_2dZgkde_2dZgkde_2d_weightedr1   r1   r2   	test_seed  s    

r   )(Zscipyr   Znumpyr   Znumpy.testingr   r   r   r   r   r   r   re   r3   r9   ZmarkZslowrR   rS   rh   rj   r   rl   ry   r~   r   r   r   r   r   Z_ftypesZparametrizer   r   r   Zxslowr   r   r   r   r1   r1   r1   r2   <module>   sD     
&
'
&
