login
A199799
Totatives of 111111.
2
1, 2, 4, 5, 8, 10, 16, 17, 19, 20, 23, 25, 29, 31, 32, 34, 38, 40, 41, 43, 46, 47, 50, 53, 58, 59, 61, 62, 64, 67, 68, 71, 73, 76, 79, 80, 82, 83, 85, 86, 89, 92, 94, 95, 97, 100, 101, 103, 106, 107, 109, 113, 115, 116, 118, 122, 124, 125, 127, 128, 131, 134
OFFSET
1,2
COMMENTS
a(n) and 111111 are coprime, 111111 = 3*7*11*13*37; empty intersections with A008585, A008593, A008595, or A085959; sequence is finite with 51840 terms, A000010(111111) = 51840, last term: a(51840) = 111110.
LINKS
Eric Weisstein's World of Mathematics, Repunit
Eric Weisstein's World of Mathematics, Totative
MATHEMATICA
Select[Range[200], CoprimeQ[#, 111111]&] (* Paolo Xausa, Sep 27 2023 *)
PROG
(Haskell)
a199799 n = a199799_list !! (n-1)
a199799_list = [x | x <- [1..111111], gcd x 111111 == 1]
CROSSREFS
Cf. A109492 (divisors of 111111).
Sequence in context: A039895 A300351 A105425 * A032937 A126684 A089653
KEYWORD
nonn,fini
AUTHOR
Reinhard Zumkeller, Nov 11 2011
STATUS
approved