1,4

This sequence tends to infinity as n tends to infinity.

Rémy Sigrist, Table of n, a(n) for n = 1..10000

Rémy Sigrist, Illustration of the first terms

(PARI) a = vector(100); for (n=1, #a, if (n>1, a[n] = 1 + a[n - primepi(factor(n)[1, 1])]); print1 (a[n] ", "))

Cf. A055396.

Sequence in context: A286716 A029213 A029209 * A108309 A103469 A029326

Adjacent sequences: A282627 A282628 A282629 * A282631 A282632 A282633

nonn

Rémy Sigrist, Apr 09 2017

approved