A227979 Integers not of the form (a^k+b^k)/(a+b) for any positive integer values of a, b, k with b > a.
2, 4, 6, 8, 9, 14, 16, 18, 22, 23, 24, 32, 33, 36, 38, 42, 44, 46, 47, 54, 56, 59, 62, 64, 66, 69, 71, 72, 77, 81, 83, 86, 88, 92, 94, 96, 98, 99, 107, 114, 118, 121, 126, 128, 131, 132, 134, 138, 141, 142, 144, 152, 154, 158, 161, 162, 166, 167, 168, 177
Offset: 1
Keywords
Links
- Robert Price, Table of n, a(n) for n = 1..66
- J. Brillhart et al., Factorizations of b^n +- 1, Contemporary Mathematics, Vol. 22, Amer. Math. Soc., Providence, RI, 3rd edition, 2002.
- H. Dubner and T. Granlund, Primes of the Form (b^n+1)/(b+1), J. Integer Sequences, 3 (2000), #P00.2.7.
- H. Lifchitz, Mersenne and Fermat primes field
- Eric Weisstein's World of Mathematics, Repunit.
Crossrefs
Programs
-
Mathematica
limit=200; lst = {}; Do[p = (a^k + b^k)/(a + b); If[p <= limit && IntegerQ[p], AppendTo[lst, p]], {k, Log[2,3*limit+1]}, {b, 2, limit*2}, {a, b-1}]; Complement[Range[limit], Union[lst]]
Comments