1,3

Table of n, a(n) for n=1..102.

Array[ Function[ n, RealDigits[ N[ Power[ n, 1/7 ], n+6 ] ]// (#[ [ 1, #[ [ 2 ] ]+n ] ])& ], 110 ]

Sequence in context: A252851 A241290 A201298 * A187426 A226765 A132696

Adjacent sequences: A029684 A029685 A029686 * A029688 A029689 A029690

nonn,base

N. J. A. Sloane, Olivier Gérard

approved