A318606 Numbers of the form p^k-k for some prime, p, and integer k >= 0.
1, 2, 4, 5, 6, 7, 10, 12, 16, 18, 22, 23, 24, 27, 28, 30, 36, 40, 42, 46, 47, 52, 58, 60, 66, 70, 72, 77, 78, 82, 88, 96, 100, 102, 106, 108, 112, 119, 121, 122, 126, 130, 136, 138, 148, 150, 156, 162, 166, 167, 172, 178, 180, 190, 192, 196, 198, 210, 222, 226, 228, 232, 238, 240, 248, 250, 256, 262
Offset: 1
Keywords
Examples
2^7-7=121, so 121 is in the sequence.
Links
- Jud McCranie, Table of n, a(n) for n = 1..5000
- S. P. Hurd and J. S. McCranie, Integers that are Sums of Uniform Powers of all their Prime Factors: the sequence A068916, J. of Int. Seq., vol 22 (2019), article 19.3.4.
Programs
-
Mathematica
With[{nn = 265}, Union@ Flatten@ Table[p^k - k, {p, Prime@ Range@ PrimePi@ nn}, {k, Log[p, nn]}]] (* Michael De Vlieger, Jul 16 2019 *)