A112989 Terms in A006899 which are closer to the next term than to the previous one.

8, 27, 64, 243, 512, 2048, 6561, 16384, 59049, 131072, 524288, 1594323, 4194304, 14348907, 33554432, 129140163, 268435456, 1073741824, 3486784401, 8589934592, 31381059609, 68719476736, 274877906944, 847288609443, 2199023255552

Offset: 1

Author

Zak Seidov, Jan 03 2006

Keywords

• nonn

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.

Crossrefs

Cf. A006899.

Programs

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}]

Formula

A006899(n) - A006899(n-1) > A006899(n+1) - A006899(n)