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 A272634 #10 May 04 2016 19:26:59 %S A272634 0,1,2,4,6,7,13,19,23,31,33,37,43,47,49,53,55,61,63,67,73,75,79,83,89, %T A272634 91,97,103,109,113,115,117,119,121,139,141,151,153,157,159,167,169, %U A272634 175,181,183,187,193,199,201,205,211,217,219,223,229,233,235,243,245,251,257,263,283,285,289,301,303,307,313,317 %N A272634 Discriminators of the primes (A272633), without duplicates. %C A272634 Range of the sequence A272633. %H A272634 Alois P. Heinz, <a href="/A272634/b272634.txt">Table of n, a(n) for n = 1..5566</a> %t A272634 {0}~Join~Union@ Table[SelectFirst[Range[10^3], Function[m, Length@ Union@ # == Length@ # &@ Mod[Prime@ Range@ n, m]]], {n, 120}] (* _Michael De Vlieger_, May 04 2016, Version 10 *) %o A272634 (PARI) Set(A272633(nMax=200)) %Y A272634 Cf. A272633. %K A272634 nonn %O A272634 1,3 %A A272634 _M. F. Hasler_, May 04 2016