|
Search: id:A086143
|
|
|
| A086143 |
|
Palindromes of the form n^3 + n^2 + n + 1. |
|
+0
1
|
|
| 4, 585, 1111, 99499, 1010101, 1001001001, 1000100010001, 1000010000100001, 1000001000001000001, 1000000100000010000001
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
COMMENT
|
Values of n are 1, 8, 10, 46, 100, 1000, etc.
|
|
MATHEMATICA
|
f[n_] := (n^3 + n^2 + n + 1); a = Select[ Range[10^7], FromDigits[ Reverse[ IntegerDigits[ f[ # ]]]] == f[ # ] & ]; a^3 + a^2 + a + 1
|
|
CROSSREFS
|
Sequence A028414 deals with n^2 + n + 1.
Sequence in context: A134372 A102201 A102204 this_sequence A123657 A069641 A079103
Adjacent sequences: A086140 A086141 A086142 this_sequence A086144 A086145 A086146
|
|
KEYWORD
|
base,nonn
|
|
AUTHOR
|
Karl Goiser (kggoiser(AT)utas.edu.au), Aug 24 2003
|
|
EXTENSIONS
|
More terms from Robert G. Wilson v (rgwv(AT)rgwv.com), Sep 01 2003
|
|
|
Search completed in 0.002 seconds
|
