A162587 Prime numbers p = 8n + 7 for which k = (7 * (256^n - 16^n) + n^2) / (n * p) is an integer.
23, 31, 47, 71, 79, 103, 127, 151, 167, 199, 223, 263, 367, 439, 487, 607, 631, 647, 727, 823, 887, 967, 1031, 1087, 1303, 1327, 1367, 1447, 1543, 1567, 1607, 1879, 1951, 2207, 2311, 2503, 2647, 2671, 2887, 3079, 3271, 3463, 3527, 3607, 3727, 3847, 3967
Offset: 1
Links
- Harvey P. Dale, Table of n, a(n) for n = 1..1000
Programs
-
Mathematica
Transpose[Select[Table[{n,8n+7},{n,500}],PrimeQ[Last[#]]&&IntegerQ[(7*(256^First[ #]-16^First[#])+First[#]^2)/Times@@#]&]][[2]] (* Harvey P. Dale, Sep 13 2014 *)