cp's OEIS Frontend

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.

Showing 1-7 of 7 results.

A066498 Numbers k such that 3 divides phi(k).

Original entry on oeis.org

7, 9, 13, 14, 18, 19, 21, 26, 27, 28, 31, 35, 36, 37, 38, 39, 42, 43, 45, 49, 52, 54, 56, 57, 61, 62, 63, 65, 67, 70, 72, 73, 74, 76, 77, 78, 79, 81, 84, 86, 90, 91, 93, 95, 97, 98, 99, 103, 104, 105, 108, 109, 111, 112, 114, 117, 119, 122, 124, 126, 127, 129, 130, 133
Offset: 1

Views

Author

Benoit Cloitre, Jan 04 2002

Keywords

Comments

Numbers k such that x^3 == 1 (mod k) has solutions 1 < x < k.
Terms are multiple of 9 or of a prime of the form 6k+1.
If k is a term of this sequence, then G = is a non-abelian group of order 3k, where 1 < r < n and r^3 == 1 (mod k). For example, G can be the subgroup of GL(2, Z_k) generated by x = {{1, 1}, {0, 1}} and y = {{r, 0}, {0, 1}}. - Jianing Song, Sep 17 2019
The asymptotic density of this sequence is 1 (Dressler, 1975). - Amiram Eldar, Mar 21 2021

Examples

			If n < 7 then x^3 = 1 (mod n) has no solution 1 < x < n, but {2,4} are solutions to x^3 == 1 (mod 7), hence a(1) = 7.
		

Crossrefs

Complement of A088232.
A007645 gives the primes congruent to 1 mod 3.
Column k=2 of A277915.

Programs

  • Mathematica
    Select[Range[150], Divisible[EulerPhi[#], 3]&] (* Harvey P. Dale, Jan 12 2011 *)
  • PARI
    isok(k)={ eulerphi(k)%3 == 0 } \\ Harry J. Smith, Feb 18 2010

Extensions

Simpler definition from Yuval Dekel (dekelyuval(AT)hotmail.com), Oct 25 2003
Corrected and extended by Ray Chandler, Nov 05 2003

A066502 Numbers k such that 7 divides phi(k).

Original entry on oeis.org

29, 43, 49, 58, 71, 86, 87, 98, 113, 116, 127, 129, 142, 145, 147, 172, 174, 196, 197, 203, 211, 213, 215, 226, 232, 239, 245, 254, 258, 261, 281, 284, 290, 294, 301, 319, 337, 339, 343, 344, 348, 355, 377, 379, 381, 387, 392, 394, 406, 421, 422, 426, 430
Offset: 1

Views

Author

Benoit Cloitre, Jan 04 2002

Keywords

Comments

Related to the equation x^7 == 1 (mod k): sequence gives values of k such there are solutions 1 < x < k of x^7 == 1 (mod k).
If k is a term of this sequence, then G = is a non-abelian group of order 7k, where 1 < r < n and r^7 == 1 (mod k). For example, G can be the subgroup of GL(2, Z_k) generated by x = {{1, 1}, {0, 1}} and y = {{r, 0}, {0, 1}}. - Jianing Song, Sep 17 2019
The asymptotic density of this sequence is 1 (Dressler, 1975). - Amiram Eldar, May 23 2022

Examples

			x^7 == 1 (mod k) has solutions 1 < x < k for k = 29, 43, 49, ...
		

Crossrefs

Programs

  • Mathematica
    Select[Range[500],Divisible[EulerPhi[#],7]&] (* Harvey P. Dale, Apr 12 2012 *)
  • PARI
    isok(k) = { eulerphi(k)%7 == 0 } \\ Harry J. Smith, Feb 18 2010

Formula

a(n) are the numbers generated by 7^2 = 49 and all primes congruent to 1 mod 7 (A045465). Hence sequence gives all k such that k == 0 (mod A045465(n)) for some n > 1 or k == 0 (mod 49).

Extensions

Simpler definition from Yuval Dekel (dekelyuval(AT)hotmail.com), Oct 25 2003

A066500 Numbers k such that 5 divides phi(k).

Original entry on oeis.org

11, 22, 25, 31, 33, 41, 44, 50, 55, 61, 62, 66, 71, 75, 77, 82, 88, 93, 99, 100, 101, 110, 121, 122, 123, 124, 125, 131, 132, 142, 143, 150, 151, 154, 155, 164, 165, 175, 176, 181, 183, 186, 187, 191, 198, 200, 202, 205, 209, 211, 213, 217, 220, 225, 231, 241
Offset: 1

Views

Author

Benoit Cloitre, Jan 04 2002

Keywords

Comments

Related to the equation x^5 == 1 (mod k): sequence gives values of k such there are solutions 1 < x < k of x^5 == 1 (mod k).
If k is a term of this sequence, then G = is a non-abelian group of order 5k, where 1 < r < n and r^5 == 1 (mod k). For example, G can be the subgroup of GL(2, Z_k) generated by x = {{1, 1}, {0, 1}} and y = {{r, 0}, {0, 1}}. - Jianing Song, Sep 17 2019
The asymptotic density of this sequence is 1 (Dressler, 1975). - Amiram Eldar, May 23 2022

Examples

			x^5 == 1 (mod 11) has solutions 1 < x < 11, namely {3,4,5,9}.
		

Crossrefs

Programs

  • Mathematica
    Select[Range[250], Divisible[EulerPhi[#], 5] &] (* Amiram Eldar, May 23 2022 *)
  • PARI
    isok(k) = { eulerphi(k)%5 == 0 } \\ Harry J. Smith, Feb 18 2010

Formula

a(n) are the numbers generated by 5^2 = 25 and all primes congruent to 1 mod 5 (A045453). Hence sequence gives all k such that k == 0 (mod A045453(n)) for some n > 1 or k == 0 (mod 25).

Extensions

Simpler definition from Yuval Dekel (dekelyuval(AT)hotmail.com), Oct 25 2003
Extended by Ray Chandler, Nov 06 2003

A066501 Numbers k such that x^6 == 1 (mod(k)) has no solution 1 < x < k-1.

Original entry on oeis.org

1, 2, 3, 4, 5, 6, 10, 11, 17, 22, 23, 25, 29, 34, 41, 46, 47, 50, 53, 58, 59, 71, 82, 83, 89, 94, 101, 106, 107, 113, 118, 121, 125, 131, 137, 142, 149, 166, 167, 173, 178, 179, 191, 197, 202, 214, 226, 227, 233, 239, 242, 250, 251, 257, 262, 263, 269, 274, 281, 289, 293
Offset: 1

Views

Author

Benoit Cloitre, Jan 04 2002

Keywords

Crossrefs

Programs

  • PARI
    isok(n) = {for (x=2, n-2, if ((Mod(x, n)^6) == Mod(1, n), return (0));); return (1);} \\ Michel Marcus, Nov 20 2013

Formula

Sequence consists of the numbers 4, 6 and for all k > 1, A045309(k), 2*A045309(k), A045309(k)^2, 2*A045309(k)^2.

Extensions

Extended by Ray Chandler, Nov 06 2003
Terms 1, 2 and 3 prepended by Michel Marcus, Nov 20 2013

A172019 Numbers k such that 4 divides phi(k) (i.e., A000010(k)).

Original entry on oeis.org

5, 8, 10, 12, 13, 15, 16, 17, 20, 21, 24, 25, 26, 28, 29, 30, 32, 33, 34, 35, 36, 37, 39, 40, 41, 42, 44, 45, 48, 50, 51, 52, 53, 55, 56, 57, 58, 60, 61, 63, 64, 65, 66, 68, 69, 70, 72, 73, 74, 75, 76, 77, 78, 80, 82, 84, 85, 87, 88, 89, 90, 91, 92, 93, 95, 96, 97, 99, 100, 101
Offset: 1

Views

Author

Giovanni Teofilatto, Jan 22 2010

Keywords

Comments

Complement of A097987.
The asymptotic density of this sequence is 1 (Dressler, 1975). - Amiram Eldar, Feb 12 2021

Crossrefs

Programs

  • Mathematica
    Select[Range[200], Mod[EulerPhi[#], 4] == 0 &] (* Geoffrey Critzer, Nov 30 2014 *)
  • PARI
    is(n)=my(o=valuation(n, 2), p); (o>1 || !isprimepower(n>>o, &p) || p%4<2) && n>4 \\ Charles R Greathouse IV, Mar 05 2013

A353768 a(n) = phi(n) mod 4; Euler totient function reduced modulo 4.

Original entry on oeis.org

1, 1, 2, 2, 0, 2, 2, 0, 2, 0, 2, 0, 0, 2, 0, 0, 0, 2, 2, 0, 0, 2, 2, 0, 0, 0, 2, 0, 0, 0, 2, 0, 0, 0, 0, 0, 0, 2, 0, 0, 0, 0, 2, 0, 0, 2, 2, 0, 2, 0, 0, 0, 0, 2, 0, 0, 0, 0, 2, 0, 0, 2, 0, 0, 0, 0, 2, 0, 0, 0, 2, 0, 0, 0, 0, 0, 0, 0, 2, 0, 2, 0, 2, 0, 0, 2, 0, 0, 0, 0, 0, 0, 0, 2, 0, 0, 0, 2, 0, 0, 0, 0, 2, 0, 0, 0, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 2, 0, 0, 2
Offset: 1

Views

Author

Antti Karttunen, May 15 2022

Keywords

Crossrefs

Cf. A000010, A010873, A066499 (positions of 2's), A172019 (of 0's).
Cf. also A074942, A261872, A084300, and also A105824.

Programs

  • PARI
    A353768(n) = (eulerphi(n)%4);

Formula

a(n) = A010873(A000010(n)).

A097987 Numbers k such that 4 does not divide phi(k), where phi is Euler's totient function (A000010).

Original entry on oeis.org

1, 2, 3, 4, 6, 7, 9, 11, 14, 18, 19, 22, 23, 27, 31, 38, 43, 46, 47, 49, 54, 59, 62, 67, 71, 79, 81, 83, 86, 94, 98, 103, 107, 118, 121, 127, 131, 134, 139, 142, 151, 158, 162, 163, 166, 167, 179, 191, 199, 206, 211, 214, 223, 227, 239, 242, 243, 251, 254, 262, 263, 271
Offset: 1

Views

Author

Lekraj Beedassy, Sep 07 2004

Keywords

Comments

The asymptotic density of this sequence is 0 (Dressler, 1975). - Amiram Eldar, Jul 23 2020

Crossrefs

Essentially the same as A066499.
Cf. A000010.
Complement of A172019.

Programs

  • Mathematica
    Select[Range@275, ! Divisible[EulerPhi[#], 4] &] (* Ivan Neretin, Aug 24 2016 *)
  • PARI
    is(n)=my(o=valuation(n,2),p); (o<2 && isprimepower(n>>o,&p) && p%4>1) || n<5 \\ Charles R Greathouse IV, Feb 21 2013

Formula

a(n)=1, 2, 4, p^k, 2*p^k, with prime p == 3 (mod 4).

Extensions

Corrected and extended by Vladeta Jovovic, Sep 08 2004
Showing 1-7 of 7 results.