A229488 Conjecturally, possible differences between prime(k)^2 and the previous prime for some k.
1, 2, 6, 8, 12, 14, 18, 20, 24, 26, 30, 32, 38, 42, 44, 48, 50, 54, 56, 60, 62, 66, 68, 72, 74, 78, 80, 84, 86, 90, 92, 96, 98, 102, 104, 108, 110, 114, 116, 120, 122, 126, 128, 132, 134, 138, 140, 146, 150, 152, 156, 158, 162, 164, 168, 170, 174, 176, 180
Offset: 1
Keywords
Crossrefs
Programs
-
Mathematica
t = Table[p2 = Prime[k]^2; p2 - NextPrime[p2, -1], {k, 100000}]; Take[Union[t], 60]
Comments