login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A272634
Discriminators of the primes (A272633), without duplicates.
1
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, 91, 97, 103, 109, 113, 115, 117, 119, 121, 139, 141, 151, 153, 157, 159, 167, 169, 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
OFFSET
1,3
COMMENTS
Range of the sequence A272633.
LINKS
MATHEMATICA
{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 *)
PROG
(PARI) Set(A272633(nMax=200))
CROSSREFS
Cf. A272633.
Sequence in context: A191190 A191133 A050053 * A084591 A088758 A105176
KEYWORD
nonn
AUTHOR
M. F. Hasler, May 04 2016
STATUS
approved

  NODES
COMMUNITY 1
INTERN 1