OFFSET
1,1
COMMENTS
Next terms are: 17592186044416, 68630377364883, 140737488355328, 562949953421312, 1853020188851841, 4503599627370496, 16677181699666569, 36028797018963968, 144115188075855872, 450283905890997363, 1152921504606846976. Is the sequence infinite? Cf. A006899 Numbers of the form 2^i or 3^j.
MATHEMATICA
un=Union[Flatten[Table[{2^n, 3^n}, {n, 60}]]]; Do[If[un[[i]]-un[[i-1]]>un[[i+1]]-un[[i]], Print[un[[i]]]], {i, 2, Length[un]-1}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Zak Seidov, Jan 03 2006
STATUS
approved