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-4 of 4 results.

A249541 Numbers m such that phi(m-2) divides m-1 where phi is Euler's totient function (A000010).

Original entry on oeis.org

3, 4, 5, 17, 257, 65537, 83623937, 4294967297, 6992962672132097
Offset: 1

Views

Author

Jaroslav Krizek, Feb 25 2015

Keywords

Comments

The first 5 known Fermat primes from A019434 are in this sequence.
Corresponding values of numbers k(m) = (m-1) / phi(m-2): 2, 3, 2, 2, 2, 2, 2, 2, ...
Conjecture: 4 is the only number m such that 3*phi(m-2) = m-1. (See comment in A203966.)

Examples

			4 is in the sequence because phi(4-2) = 1 divides 4-1 = 3.
		

Crossrefs

Supersequence of A232720 and A254576.

Programs

  • Magma
    [n: n in [3..10000000] | (n-1) mod EulerPhi(n-2) eq 0];

Formula

a(n) = A203966(n+1) + 2. - Max Alekseyev, Feb 01 2024

Extensions

a(9) confirmed by Max Alekseyev, Feb 01 2024

A254576 Primes p such that phi(p-2) divides p-1 where phi is Euler's totient function (A000010).

Original entry on oeis.org

3, 5, 17, 257, 65537, 83623937
Offset: 1

Views

Author

Jaroslav Krizek, Feb 25 2015

Keywords

Comments

The first 5 known Fermat primes from A019434 are terms.
Conjecture: also primes p such that 2*phi(p-2) = p-1 (i.e., primes in A232720).
a(7) > 10^25. - Max Alekseyev, Feb 02 2024

Crossrefs

Subsequence of A249541.

Programs

  • Magma
    [n: n in [3..10000000] | IsPrime(n) and (n-1) mod EulerPhi(n-2) eq 0];

A262534 Numbers k such that phi(k-2) = phi(k-1) = (k-1) / 2.

Original entry on oeis.org

3, 5, 17, 257, 65537, 4294967297
Offset: 1

Views

Author

Jaroslav Krizek, Sep 24 2015

Keywords

Comments

No more terms below 10^8; 4294967297 is a term of this sequence.
First 5 terms are Fermat primes (A019434).
Conjecture: next term is 4294967297.
Subsequence of A232720 and A000051.
Sequence is different from A232720 and A000215; A232720(6) = 83623937 and A000215(7) = 18446744073709551617 are not terms of this sequence.
From Jeppe Stig Nielsen, Nov 19 2016: (Start)
Since n-1 is a solution to phi(x)=x/2, it is clear from the formula for phi that x=n-1 is a nontrivial power of two (in A000079 and even). Then y=n-2 is an odd number such that phi(y) is a power of two, and again recalling the formula for phi, this can only happen when y is a product of distinct Fermat primes (y in A045544).
Question: Is the above comment, together with Euler's demonstration that the Fermat number 2^32 + 1 = A000215(5) is composite, enough to prove that A262534 has only these six terms?
With the above observations, we need only search next to powers of two (A000051), so it is quick to determine that there are no terms between 65537 and 4294967297. (End)
From Robert Israel, Dec 08 2016: (Start)
The j-th binary digit (i.e. coefficient of 2^j) of the product of a set of distinct Fermat numbers, say y=Product_{k in T} (2^(2^k)+1), is 1 iff j = Sum_{k in S} 2^k for some subset S of T. In order for x = y+1 to be a power of 2, all of y's binary digits must be 1. Since 2^(2^5)+1 is composite, T cannot contain 5, so digit 32 is 0, and y < 2^32. Thus we do have only these 6 terms. (End)

Examples

			17 is in this sequence because phi(15) = phi(16) = 8 = (17 - 1) / 2.
		

Crossrefs

Programs

  • Magma
    [n: n in [3..10000000] | n-1 eq 2*EulerPhi(n-1) and n-1 eq 2*EulerPhi(n-2)];
    
  • Mathematica
    Select[Range@ 100000, EulerPhi[# - 2] == EulerPhi[# - 1] == (# - 1)/2 &] (* Michael De Vlieger, Sep 25 2015 *)
  • PARI
    for(n=1, 1e8, if(eulerphi(n-2) == eulerphi(n-1) && 2*eulerphi(n-1) == (n-1), print1(n ", "))) \\ Altug Alkan, Oct 11 2015

Extensions

a(6) from Jeppe Stig Nielsen, Nov 19 2016

A074057 a(n) = 2*phi(n-2)-(n-1).

Original entry on oeis.org

0, -1, 0, -1, 2, -3, 4, -1, 2, -3, 8, -5, 10, -3, 0, -1, 14, -7, 16, -5, 2, -3, 20, -9, 14, -3, 8, -5, 26, -15, 28, -1, 6, -3, 12, -13, 34, -3, 8, -9, 38, -19, 40, -5, 2, -3, 44, -17, 34, -11, 12, -5, 50, -19, 24, -9, 14, -3, 56, -29, 58, -3, 8, -1, 30, -27, 64, -5, 18, -23, 68, -25, 70, -3, 4, -5, 42, -31, 76, -17, 26, -3, 80
Offset: 3

Views

Author

Benoit Cloitre, Sep 15 2002

Keywords

Comments

Conjecture : a(n)=0 if and only if n is a Fermat prime (A019434).
The conjecture appears to be false, a(83623937)=0 and 83623937 is not a Fermat number (A000215). See A232720 for sequence of n such that a(n)=0. - Michel Marcus, Nov 28 2013

Crossrefs

Cf. A000010.

Programs

  • Mathematica
    Table[2*EulerPhi[n-1]-n,{n,2,90}] (* Harvey P. Dale, May 22 2020 *)
  • PARI
    a(n) = 2*eulerphi(n-2) - (n-1); \\ Michel Marcus, Nov 28 2013

Formula

a(n)=-1 if n is of the form 2^x+2;
a(n)=-3 if n is in a subsequence b(k) = 8, 12, 16, 24, 28, 36, 40, 48, 60, 64, 76, 84, 88, 96..( b(k) seems to be asymptotic to c*n*log(n) with c=2.28..).
Showing 1-4 of 4 results.