|
Search: id:A054987
|
|
|
| A054987 |
|
Smallest composite x such that Sigma[x+2^n]=Sigma[x]+2^n; n>2. |
|
+0
5
|
|
| 434, 305635357, 27, 39, 106645, 69, 2275, 63, 6475, 249, 7735, 3703, 10803, 16383, 58869, 51181, 87951, 1695, 9579, 105237, 98828, 1143369, 789609, 11625, 14038691, 178975
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
COMMENT
|
The sequence is initiated by smallest of A015915. Special primes of A023202, A049488-A049491 also satisfy the Sigma[p+2^w]=Sigma[p]+2^w relation
|
|
EXAMPLE
|
For the term 69: Sigma[69+2^6] = Sigma[133] = 1+7+19+133 = Sigma[69]+64 = (1+3+23+69)+64 = 160.
|
|
MATHEMATICA
|
Table[ Select[ Range[ 1, 110000 ], Equal[ EulerPhi[ #+2^k ]-EulerPhi[ # ]-2^k, 0 ] &&!PrimeQ[ # ]& ], {k, 1, 22} ]
|
|
CROSSREFS
|
Cf. A049488-A049491, A001359, A054799, A015913, A015915, A023200, A023202, A054905.
Sequence in context: A054982 A108785 A050507 this_sequence A054905 A124043 A084293
Adjacent sequences: A054984 A054985 A054986 this_sequence A054988 A054989 A054990
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Labos E. (labos(AT)ana.sote.hu), May 29 2000
|
|
EXTENSIONS
|
More terms from Labos E. (labos(AT)ana.sote.hu), Aug 14 2003
|
|
|
Search completed in 0.002 seconds
|
