A319524 a(n) is the smallest number that belongs simultaneously to the two arithmetic progressions prime(n) + m*prime(n+1) and prime(n+1) + m*prime(n+2), m >= 1, n >= 1.
8, 33, 40, 128, 115, 302, 226, 226, 835, 401, 734, 1718, 1030, 842, 3121, 3475, 1401, 2339, 5108, 1969, 3233, 2486, 6491, 9692, 10298, 5560, 11552, 6211, 4177, 7987, 6022, 18763, 16678, 21893, 8001, 25585, 13523, 9682, 30961, 32035, 7057, 36089, 19105, 39002, 7162, 47041, 50163, 51752
Offset: 1
Links
- Alois P. Heinz, Table of n, a(n) for n = 1..20000 (first 600 terms from Muniru A Asiru)
- Fourth International contest of logical problems, Problem 7, the Ludomind Society.
- Fifth International contest of logical problems, Problem 6, the Ludomind Society, 2009.
- Olivier Gérard, in reply to Zak Seidov, 11 related sequences, SeqFan list, Apr 14 2016.
Programs
-
GAP
P:=Filtered([1..10000],IsPrime);; T:=List([1..Length(P)-1],n->List([1..Length(P)-1],m->P[n]+m*P[n+1]));; a:=List([1..50],k->Minimum(List([1..Length(T)-1],i->Intersection(T[i],T[i+1]))[k])); # Muniru A Asiru, Sep 26 2018
-
Mathematica
a[n_]:=ChineseRemainder[{Prime[n],Prime[n+1]},{Prime[n+1],Prime[n+2]} ];Array[a,44] (* Amiram Eldar, Sep 22 2018 *)
Extensions
Table from Jon E. Schoenfield, Sep 23 2018
More terms from Amiram Eldar, Sep 22 2018
Comments