|
Search: id:A073019
|
|
|
| A073019 |
|
Numbers n such that the real part of (1+2I)^n is prime. |
|
+0 1
|
|
| 2, 3, 4, 5, 7, 11, 13, 17, 19, 89, 163, 167, 233, 251, 349, 401, 757, 1423, 3049, 3643, 11987
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
MATHEMATICA
|
x=1; For[n=1, n<=14000, n++, {x=(1+2*I)*x, If[PrimeQ[Re[x]], Print[n]]}]
|
|
CROSSREFS
|
Cf. A006495.
Adjacent sequences: A073016 A073017 A073018 this_sequence A073020 A073021 A073022
Sequence in context: A036844 A033070 A046022 this_sequence A007885 A003037 A046420
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Benoit Cloitre (benoit7848c(AT)orange.fr), Aug 03 2002
|
|
EXTENSIONS
|
Edited by John W. Layman (layman(AT)math.vt.edu), Aug 13 2002
a(21) from Robert G. Wilson v (rgwv(AT)rgwv.com), Aug 22 2002
|
|
|
Search completed in 0.002 seconds
|