This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A073069 #8 May 26 2021 08:44:00
%S A073069 5,26,30,32,36,42,43,46,47,48,49,50,51,59,64,65,67,68,71,74,76,84,86,
%T A073069 87,95,102,106,109,121,123,129,130,134,137,138,139,141,151,152,153,
%U A073069 154,156,157,158,165,167,168,169,170,171,172,173,174,177,178,182,185,186
%N A073069 Indices of primes with non-distinct digits.
%t A073069 ta=IntegerDigits[Prime[Range[1000]]]; ta2=Table[Length[ta[[i]]]>Length[Union[ta[[i]]]], {i, 1000}]; Flatten[Position[ta2, True]]
%o A073069 (Python)
%o A073069 from sympy import prime, primerange
%o A073069 def ok(p): s = str(p); return len(set(s)) < len(s)
%o A073069 def aupto(limit):
%o A073069 alst = []
%o A073069 for pi, p in enumerate(primerange(1, prime(limit)+1), start = 1):
%o A073069 if ok(p): alst.append(pi)
%o A073069 return alst
%o A073069 print(aupto(186)) # _Michael S. Branicky_, May 26 2021
%Y A073069 Indices of primes in A073064. Cf. A030291.
%K A073069 easy,base,nonn
%O A073069 1,1
%A A073069 _Zak Seidov_ Aug 24 2002