|
| |
|
|
A056850
|
|
Absolute difference of 3^n and 2^k is minimal.
|
|
3
| |
|
|
0, 1, 1, 5, 17, 13, 217, 139, 1631, 3299, 6487, 46075, 7153, 502829, 588665, 2428309, 9492289, 5077565, 118985033, 88519643, 808182895, 1870418611, 2978678759, 25423702091, 7551629537, 252223018333, 342842572777, 1170495537221
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,4
|
|
|
COMMENTS
| Except for 3^0 - 2^0, 3^1 - 2^1 and 3^2 - 2^3, there are no cases where the differences are less than 4.
|
|
|
MATHEMATICA
| Do[ k = 0; While[ Abs[ 3^n - 2^k ] > Abs[ 3^n - 2^(k + 1) ], k++ ]; Print[ Abs[ 3^n - 2^k ] ], {n, 0, 70} ]
|
|
|
CROSSREFS
| Sequence in context: A070848 A060829 A096896 * A128895 A141558 A040153
Adjacent sequences: A056847 A056848 A056849 * A056851 A056852 A056853
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Robert G. Wilson v (rgwv(AT)rgwv.com), Aug 30 2000
|
| |
|
|
