|
| |
|
|
A076171
|
|
Primes p such that sum of cubes of even-position digits equals the sum of cubes of odd-position digits of p.
|
|
2
| |
|
|
11, 404167, 476041, 1041563, 1060571, 1069811, 1089611, 1089677, 1140563, 1156403, 1169801, 1180691, 1650413, 1760897, 1960877, 2062891, 2089621, 2260891, 2289601, 2960821, 2962801, 3046577, 3047567, 3056411, 3146501
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
COMMENTS
| There are 15 such primes < 2000000.
|
|
|
EXAMPLE
| 404167 is OK because 4^3+4^3+6^3=0^3+1^3+7^3=344.
|
|
|
MATHEMATICA
| cbQ[n_]:=Module[{idn=IntegerDigits[n], a, l, r}, If[OddQ[Length[idn]], idn=IntegerDigits[10n]]; a=Transpose[Partition[idn, 2]]; l=First[a]; r=Last[a]; Total[l^3]==Total[r^3]]; Select[Prime[Range[300000]], cbQ] [From Harvey P. Dale, Jan 30 2011]
|
|
|
CROSSREFS
| Sequence in context: A076173 A100108 A099115 * A090102 A112854 A014127
Adjacent sequences: A076168 A076169 A076170 * A076172 A076173 A076174
|
|
|
KEYWORD
| nonn,base
|
|
|
AUTHOR
| Zak Seidov (zakseidov(AT)yahoo.com), Nov 01 2002
|
|
|
EXTENSIONS
| More terms from David Wasserman (wasserma(AT)spawar.navy.mil), Apr 05 2005
|
| |
|
|
