|
Search: id:A102872
|
|
|
| A102872 |
|
Differences between 2^n and 3^m when they are nearly equal for n and m to 100. |
|
+0
2
|
|
| 1, 5, 7, 13, 47, 295, 1631, 1909, 6487, 13085, 84997, 502829, 517135, 2428309, 3605639, 5077565, 24062143, 149450423, 808182895, 985222181, 2978678759, 6719515981, 43295774645, 252223018333, 267326277407, 1170495537221
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
FORMULA
|
a(q) = If 2^n and 3^m are such that 2^n>3^n and Floor[2^n/3^m]<2, then a[q]=Abs[2^n-3^m]
|
|
MATHEMATICA
|
c = Delete[Union[Flatten[Table[Table[If [ (2^n > 3^m) && Floor[2^n/3^m] < 2, Abs[2^n - 3^m], 0], {m, 1, n}], {n, 1, 100}], 1]], 1
|
|
CROSSREFS
|
Sequence in context: A064600 A109904 A077781 this_sequence A102873 A158892 A106022
Adjacent sequences: A102869 A102870 A102871 this_sequence A102873 A102874 A102875
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Roger Lee Bagula (rlbagulatftn(AT)yahoo.com), Mar 01 2005
|
|
EXTENSIONS
|
Is this well-defined? "Up to 100" bothers me. - N. J. A. Sloane (njas(AT)research.att.com).
|
|
|
Search completed in 0.002 seconds
|
