login
A107799
Indices of primes occurring in A107798.
2
1, 2, 3, 4, 5, 9, 15, 17, 18, 21, 24, 26, 48, 87, 102, 110, 143, 161, 177, 345, 604, 671, 797, 927, 1008, 1346, 2491, 5140, 7942, 19798, 41539, 49943, 58202, 63958, 86538
OFFSET
1,2
COMMENTS
Cf. A030284 = Primes whose digits do not appear in previous term, A107798 = Primes whose digits do not appear in two previous terms.
FORMULA
a(n)=pi(A030284(n))
MATHEMATICA
d=2; e=3; b={2, 3}; id[t_]:=IntegerDigits[t]; Do[p=Prime[n]; If[Intersection[Union[id[d], id[e]], id[p]]=={}, b=Append[b, n]; d=e; e=p], {n, 100000}]; b
CROSSREFS
Sequence in context: A222437 A060732 A068584 * A329049 A003271 A049796
KEYWORD
nonn,base
AUTHOR
Zak Seidov, May 24 2005
STATUS
approved