A196936 a(n) is the first occurrence of n in sequence A196935.

5, 7, 10, 15, 17, 20, 26, 32, 33, 35, 49, 62, 54, 63, 64, 74, 69, 71, 91, 98, 92, 102, 109, 116, 120, 124, 152, 137, 147, 144, 140, 171, 165, 192, 197, 195, 199, 201, 200, 218, 220, 250, 238, 229, 239, 230, 236, 277, 267, 281, 300, 299, 301, 314, 312, 332, 325

Offset

1,1

Comments

The Mathematica program gives the first 57 terms.

Links

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

Definition of Arithmetic Progressions of Primes

Example

A196935(5) = 1, so a(1) = 5; (consider the offset of 5 for A196935)
A196935(7) = 2, and all A196935(k) <> 2 for k < 7, so a(2) = 7

Mathematica

max = 57; Array[fa, max]; Do[fa[i] = 0, {i, 1, max}]; i = 4; done = 0; While[done < max, i++; p = Prime[i]; j = 0; ct = 0; While[j++; df = 6*j; df < p, If[(PrimeQ[p + df]) && (PrimeQ[p - df]), ct++]]; If[ct <= max, If[fa[ct] == 0, fa[ct] = i; done++]]]; Table[fa[i], {i, 1, max}]

Crossrefs

Cf. A196935, A196934.

Sequence in context: A020711 A183044 A133756 * A188196 A048584 A085382

Adjacent sequences: A196933 A196934 A196935 * A196937 A196938 A196939

Keyword

nonn

Author

Lei Zhou, Oct 07 2011

Status

approved