A113334 Values of k in A072532.
2, 2, 4, 2, 2, 14, 8, 2, 20, 12, 12, 4, 12, 34, 20, 8, 12, 28, 26, 14, 8, 14, 74, 114, 150, 192, 10, 6, 54, 12, 12, 18, 24, 186, 192, 100, 2, 126, 30, 186
Offset: 1
Keywords
Crossrefs
Cf. A072532.
This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
a = {2}; b = {1}; Do[k = 1; p = a[[n - 1]]; While[! PrimeQ[k p + 1], k++]; AppendTo[a, k p + 1]; AppendTo[b, k], {n, 2, 60}]; b (* Michael De Vlieger, Oct 03 2015, after Robert G. Wilson v at A061092 *)
terms=12; p=2; for(n=2, terms, q=p+1; while(!ispseudoprime(q), q=q+p); print1(q\p,", "); p=p*q) \\ Serge Batalov, May 19 2015
Comments