|
| |
|
|
A063455
|
|
Numbers n such that n | 9^n + 7^n + 5^n + 3^n.
|
|
0
| |
|
|
1, 2, 3, 4, 9, 27, 51, 81, 82, 207, 243, 297, 729, 2187, 2277, 4131, 6561, 9668, 10233, 17457, 19683, 24057, 27028, 30699, 33777, 33849, 50301, 52351, 56727, 59049, 92097, 112102, 133837, 134297, 136809, 177147, 184437, 197667, 256243, 264357
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
MATHEMATICA
| Select[ Range[ 200000 ], Mod[ PowerMod[ 9, #, # ] + PowerMod[ 7, #, # ] + PowerMod[ 5, #, # ] + PowerMod[ 3, #, # ], # ] == 0 & ]
|
|
|
PROG
| (PARI) j=[]; for(n=1, 20000, a=9^n+7^n+5^n+3^n; if(Mod(a, n) == 0, j=concat(j, n))); j
|
|
|
CROSSREFS
| Sequence in context: A085612 A073915 A076381 * A001144 A121253 A014118
Adjacent sequences: A063452 A063453 A063454 * A063456 A063457 A063458
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Jason Earls (zevi_35711(AT)yahoo.com), Jul 25 2001
|
|
|
EXTENSIONS
| More terms from Robert G. Wilson v (rgwv(AT)rgwv.com) and Dean Hickerson, Jul 26 2001
|
| |
|
|
