### 8.4.52 Test de Wilcoxon ou de Mann-Whitney `wilcoxont`

`wilcoxont` a comme argument 1 échantillon et une médiane ou 2 échantillons et peut avoir comme 3ième argument une fonction et comme 4ième argument un réel.
`wilcoxont` renvoie le test de Wilcoxon ou de Mann-Whitney pour 1 échantillon et une médiane ou 2 échantillons On tape :

`wilcoxont([1,3,4,5,7,8,8,12,15,17],[2,6,10,11,13,14,15,18,19,20])`

On obtient en vert :
`Mann-Whitney 2-sample test, H0 same Median, H1 <>`
`ranksum 81.5, shifted ranksum 26.5`
`u1=73.5 ,u2=26.5, u=min(u1,u2)=26.5`
`Limit value to reject H0 23`
`P-value 316/4199 (0.0752560133365), alpha=0.05 H0 not rejected`

`1`

On tape :

`wilcoxont([1,3,4,5,7,8,8,12,15,17],[2,6,10,11,13,14,15,18,19,20],0.3)`

On obtient en vert :
`Mann-Whitney 2-sample test, H0 same Median, H1 <>`
`ranksum 81.5, shifted ranksum 26.5`
`u1=73.5 ,u2=26.5, u=min(u1,u2)=26.5`
`Limit value to reject H0 35`
`P-value 316/4199 (0.0752560133365), alpha=0.01 H0 rejected`

`1`

On tape :

`wilcoxont([1,3,4,5,7,8,8,12,15,17],10,’>’)`

On obtient en vert :
`Wilcoxon 1-sample test, H0 Median=10, H1 M>10`
`Wilcoxon statistic: 18, p-value: 0.8388671875, confidence level: 0.05`

`1`

On tape :

`wilcoxont([1,3,4,5,7,8,8,12,15,17] ,10,’>’,0.05)`

On obtient en vert :
`Wilcoxon 1-sample test, H0 Median=10, H1 M>10`
`Wilcoxon statistic: 18, p-value: 0.8388671875, confidence level: 0.05`

`1`