|
%I #13 Jul 24 2017 23:25:25
%S 70,70,836,4030,17272,836,7912,7192,4030,113072,83312,7912,8812312,
%T 5830,4199030,9272,91388,10792,23941578736,786208,682592,569494624,
%U 555616,539744,15126992,73616,519712
%N Least primitive weird number, pwn, (A002975) which is divisible by the n-th prime (A000040).
%C No odd weird number exists below 10^21. The search is done on the volunteer computing project yoyo@home. - Wenjie Fang, Feb 23 2014
%C As of Dec 14 2015, there is no known pwn which is divisible by 3. Therefore the offset denotes the third prime number, 5.
%H Douglas E. Iannucci, <a href="http://arxiv.org/abs/1504.02761">On primitive weird numbers of the form 2^k*p*q</a>, arXiv:1504.02761 [math.NT], 2015.
%H Linked In, <a href="https://www.linkedin.com/grp/post/4510047-5820529955682926595">Number Theory, A very big weird number</a>
%H Giuseppe Melfi, <a href="http://dx.doi.org/10.1016/j.jnt.2014.07.024"> On the conditional infiniteness of primitive weird numbers</a>, Journal of Number Theory, Vol. 147, Feb 2015, pp. 508-514.
%H Wikipedia, <a href="http://en.wikipedia.org/wiki/Weird_number"> Weird number</a>
%e a(6) is 4030 since it is the first pwn to be divisible by the sixth prime number, 13. 4030 = 13 * 310.
%t (* copy the terms from A002975, assign them equal to 'lst' and then *) f[n_] := Select[lst, Mod[#, Prime@ n] == 0 &][[1]]; Array[f, 27, 3]
%Y Cf. A002975, A258250, A258333, A258374, A258375, A258401, A258882, A258883, A258884, A258885, A265726, A265728.
%K nonn
%O 3,1
%A Douglas E. Iannucci and _Robert G. Wilson v_, Dec 14 2015
|
