login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A226330 Critical values of Wilcoxon T test at a 2.5% level of significance (one-tail test). 3

%I #9 Oct 10 2017 22:45:02

%S 0,2,3,5,8,10,13,17,21,25,29,34,40,46,52,58,65,73,81,89,98,107,116,

%T 126,137,147,159,170,182,195,208,221,235,249,264,279,294,310,327,343,

%U 361,378,396,415,434,453,473,494,514,536,557,579,602,625,648,672,697

%N Critical values of Wilcoxon T test at a 2.5% level of significance (one-tail test).

%H Peter Mitic, <a href="http://www.mathematica-journal.com/issue/v6i3/article/mitic/contents/63mitic.pdf">Critical Values for the Wilcoxon Signed rank Statistic</a>

%H Eric Weisstein's MathWorld, <a href="http://mathworld.wolfram.com/WilcoxonSignedRankTest.html">Wilcoxon Signed Rank Test</a>

%H Wikipedia, <a href="http://en.wikipedia.org/wiki/Wilcoxon_signed-rank_test">Wilcoxon signed-rank test</a>

%F G.f. for partitions limited to sample size is product_{r=1..s} (1 + x^r).

%t g[x_, 1] := x + 1; g[x_, s_] := g[x, s] = (x^s + 1)*g[x, s - 1]; WilcoxonT[s_, p_] := Module[{m = (2^s*p)/100, cum = Accumulate[CoefficientList[g[x, s], x]], i = 0}, Scan[If[# > m, Return[i - 1], i++] & , cum]]; Table[WilcoxonT[s, 2.5], {s, 6, 100}] (* coded after Peter Mitic *)

%Y Cf. A226329 (5%), A226331 (1%), A226332 (0.5%).

%K nonn

%O 6,2

%A _Jean-Fran├žois Alcover_, Jun 04 2013

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified July 23 04:10 EDT 2024. Contains 374544 sequences. (Running on oeis4.)