A076371 Occurrences of value=n in sequence A076370.

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

Offset

1,1

Links

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

Example

Observe that one value=1 is followed by 1,2,3,4,5,.. values =2. A076370(x)=5 holds once, =7 is satisfied twice.

Mathematica

q[x_] := Apply[Times, Table[Prime[j], {j, 1, x}]] Table[Min[Flatten[Position[Table[Sign [q[j]-q[m]/q[j]], {j, 1, m}], 1]]], {m, 1, 250}] Table[Count[%, j], {j, 1, 250}]

Crossrefs

Cf. A002110, A076370.

Sequence in context: A082389 A246127 A119469 * A127439 A218775 A370558

Adjacent sequences: A076368 A076369 A076370 * A076372 A076373 A076374

Keyword

nonn

Author

Labos Elemer, Oct 14 2002

Extensions

a(1) changed to matched change in A076370 by Sean A. Irvine, Apr 01 2025

Status

approved