A098200 Number of distinct terms in iteration-list when cototient-function[=A051953] is iterated and the initial value is even number.

3, 4, 5, 5, 6, 6, 6, 6, 7, 7, 7, 7, 7, 7, 8, 7, 8, 8, 8, 8, 9, 8, 8, 8, 9, 8, 9, 8, 9, 9, 8, 8, 9, 9, 9, 9, 9, 9, 10, 9, 10, 10, 9, 9, 10, 9, 9, 9, 9, 10, 10, 9, 10, 10, 10, 9, 11, 10, 10, 10, 9, 9, 11, 9, 11, 10, 10, 10, 10, 10, 10, 10, 10, 10, 11, 10, 10, 11, 10, 10, 11, 11, 11, 11, 11, 10, 11

Offset: 1

Author

Labos Elemer, Sep 22 2004

Keywords

• nonn

Comments

Seems larger than A053475[2n+1]=A098201[n]

Crossrefs

Cf. A051953, A053475.

Formula

a[n]=A053475[2n]