A385538 First differences of A184859.

1, 2, 6, 2, 6, 4, 6, 2, 6, 10, 6, 8, 10, 2, 6, 4, 6, 8, 10, 6, 18, 8, 10, 8, 6, 4, 6, 8, 10, 2, 4, 2, 24, 4, 6, 6, 2, 10, 6, 12, 8, 6, 10, 14, 4, 6, 20, 12, 4, 6, 8, 12, 4, 18, 8, 10, 2, 22, 18, 2, 16, 8, 16, 18, 2, 24, 10, 6, 8, 16, 12, 8, 6, 18, 10, 6, 12, 14

Offset

1,2

Links

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

Formula

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

Mathematica

Differences[Select[Floor[Range[420]*GoldenRatio + 1/2], PrimeQ]] (* Amiram Eldar, Jul 10 2025 *)

Prog

(PARI) lista(nn) = my(v=select(isprime, vector(nn, k, round(k*quadgen(5))))); vector(#v-1, k, v[k+1]-v[k]) \\ Michel Marcus, Jul 08 2025

Crossrefs

Cf. A001622, A007067, A184859.

Sequence in context: A276152 A270360 A163904 * A152780 A340857 A241040

Adjacent sequences: A385535 A385536 A385537 * A385539 A385540 A385541

Keyword

nonn,easy

Author

Guido Heinig, Jul 02 2025

Status

approved