|
| |
|
|
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
| |
|
|
4, 5, 6, 7, 8, 11, 14, 21, 25, 89, 97, 110, 116, 121, 177, 235, 294, 784, 1039, 1454, 1629, 3460
(list; graph; refs; listen; history; internal format)
|
|
|
|
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: A039040 A129740 A161428 * A047567 A050038 A059709
Adjacent sequences: A073070 A073071 A073072 * 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
|
| |
|
|
