|
Search: id:A073073
|
|
|
| A073073 |
|
Numbers n such that the minimal value of abs(2^n-3^x) x>0 is prime (i.e. n such that A064024(n) is prime). |
|
+0
1
|
|
| 4, 5, 6, 7, 8, 11, 14, 21, 25, 89, 97, 110, 116, 121, 177, 235, 294, 784, 1039, 1454, 1629, 3460
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
MATHEMATICA
|
Do[k = 0; While[Abs[2^n - 3^k] > Abs[2^n - 3^(k + 1)], k++ ]; If[PrimeQ[Abs[2^n - 3^k]], Print[n]], {n, 1, 4000}] (Steinerberger)
|
|
CROSSREFS
|
Sequence in context: A047314 A039040 A129740 this_sequence A047567 A050038 A059709
Adjacent sequences: A073070 A073071 A073072 this_sequence A073074 A073075 A073076
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Benoit Cloitre (benoit7848c(AT)orange.fr), Aug 17 2002
|
|
EXTENSIONS
|
a(19)-a(22) from Stefan Steinerberger (stefan.steinerberger(AT)gmail.com), Jan 22 2006
|
|
|
Search completed in 0.002 seconds
|
