A083235 First differences of A063742, the possible values for cototients.

1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 2, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1

Offset

1,10

Comments

Differences between consecutive numbers in the range of A051853.

Links

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

Formula

a(n) = A063742(n+1) - A063742(n).

Example

First missing number in A063742 is 10=A005278[1], so a[10]=2 is the first difference here > 1.

Mathematica

t0[x_] := Table[j, {j, 1, x}] t=Table[w-EulerPhi[w], {w, 1, 10000}]; u=Union[%]; Delete[u-RotateRight[u], 1]

Crossrefs

Sequence in context: A043288 A353786 A057523 * A307609 A043287 A212177

Adjacent sequences: A083232 A083233 A083234 * A083236 A083237 A083238

Keyword

nonn

Author

Labos Elemer, May 20 2003

Extensions

Edited by N. J. A. Sloane at the suggestion of Andrew S. Plewe, Jun 23 2007

Status

approved