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.

A079276 Multiplicative inverse in the finite field F(prime(n)) of the product of the first n-1 primes modulo prime(n).

Original entry on oeis.org

1, 2, 1, 4, 1, 3, 15, 18, 20, 12, 18, 27, 7, 5, 43, 2, 4, 10, 38, 3, 60, 20, 53, 62, 52, 83, 11, 30, 27, 49, 113, 63, 79, 25, 81, 143, 80, 121, 53, 142, 81, 52, 81, 150, 136, 40, 176, 114, 167, 138, 84, 46, 239, 213, 137, 4, 122, 136, 255, 141, 273, 30, 22, 25, 179, 9, 43, 12
Offset: 1

Views

Author

Valentin F. Schmid (v_schmid(AT)hotmail.com), Feb 07 2003

Keywords

Comments

a(n)=1 if and only if n-1 is in A341805. - Jeppe Stig Nielsen, Feb 20 2021

Examples

			a(6)=3 because 2*3*5*7*11 = 2310, 2310 == 9 (mod 13) and 9*(9^(-1)) == 9*3 == 1 (mod 13).
		

Crossrefs

Programs

  • Maple
    a := n -> (1/mul(ithprime(j), j=1..n-1)) mod ithprime(n);
    seq(a(n), n=1..68); # Peter Luschny, Apr 13 2014
  • Mathematica
    a[n_] := Module[{i}, Return[PowerMod[Product[Prime[i], {i, 1, n - 1}], -1, Prime[n]]]; ];

Formula

a(1) = 1; for n>1, a(n) = ( prime(n-1)# (mod prime(n)) )^(-1), where prime(i) is the i-th prime number, prime(i)# is the product of first i primes, x^(-1) is the multiplicative inverse in the finite field F(prime(n)).

A341804 Primes p dividing (the product of the primes less than p)-1.

Original entry on oeis.org

2, 5, 11, 176078293
Offset: 1

Views

Author

Jeppe Stig Nielsen, Feb 20 2021

Keywords

Comments

The initial term 2 is included because the empty product minus 1 (which gives zero) is divisible by 2.

Examples

			The prime 11 is included because 2*3*5*7-1 is divisible by 11. Therefore, the last factor of the product, namely 7, is in A341812.
		

Crossrefs

Programs

  • PARI
    t=1;forprime(p=2,,((t-1)%p==0)&&print1(p,", ");t*=p)

A338543 Numbers k such that 1 + Product_{i

Original entry on oeis.org

1, 2, 8, 233, 431
Offset: 1

Views

Author

Robert Israel, Nov 01 2020

Keywords

Comments

Numbers k such that A062347(k-1) == -1 (mod prime(k)).

Examples

			a(3)=8 is a term because 1 + 2*3*5*7*11*13*17 = 510511 is divisible by prime(8)=19.
		

Crossrefs

Programs

  • Maple
    select(t -> 1+mul(ithprime(i),i=1..t-1) mod ithprime(t)=0, [$1..1000]);
  • PARI
    isok(n) = ((1+vecprod(primes(n-1))) % prime(n)) == 0; \\ Michel Marcus, Nov 03 2020

Formula

a(n) = A081618(n)+1 for n >= 2.

A341812 Primes p such that p#-1 is divisible by the next prime after p.

Original entry on oeis.org

3, 7, 176078267
Offset: 1

Views

Author

Jeppe Stig Nielsen, Feb 20 2021

Keywords

Comments

Here p# means A034386(p).
The next prime after p is then in A341804.

Examples

			The prime 7 is a member of this sequence because 2*3*5*7-1=209 is divisible by 11, the next prime immediately following 7.
11 is NOT a member of this sequence because 2*3*5*7*11-1=2309 is not divisible by 13 (leaves a remainder of 8), the next prime after 11.
		

Crossrefs

Programs

  • PARI
    isok(p) = if (isprime(p), my(a=Mod(1,nextprime(1+p))); forprime(q=2,p,a*=q); (a == 1)); \\ Michel Marcus, Mar 03 2021
Showing 1-4 of 4 results.