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.

Previous Showing 11-12 of 12 results.

A185073 Numbers n such that (34^n - 1)/33 is prime.

Original entry on oeis.org

13, 1493, 5851, 6379, 125101
Offset: 1

Views

Author

Robert Price, Mar 10 2012

Keywords

Crossrefs

Programs

  • Mathematica
    Select[Prime[Range[100]], PrimeQ[(34^#-1)/33]&]
  • PARI
    isok(n) = isprime((34^n-1)/33); \\ Michel Marcus, Mar 13 2016
    
  • PARI
    lista(nn) = for(n=1, nn, if(ispseudoprime((34^n - 1)/33), print1(n, ", "))); \\ Altug Alkan, Mar 13 2016

Extensions

a(5)=125101 corresponds to a probable prime discovered by Paul Bourdelais, Nov 20 2017

A294722 Numbers k such that (44^k - 1)/43 is prime.

Original entry on oeis.org

5, 31, 167, 100511
Offset: 1

Views

Author

Paul Bourdelais, Nov 07 2017

Keywords

Comments

The number corresponding to a(4) is a probable prime.
These are the indices of base-44 repunit primes, i.e., numbers k such that A002275(k) interpreted as a base-44 number and converted to decimal is prime. - Felix Fröhlich, Nov 08 2017

Crossrefs

Programs

  • Mathematica
    ParallelMap[ If[ PrimeQ[(44^# - 1)/43], #, Nothing] &, Prime@Range @ 10000] (* Robert G. Wilson v, Nov 25 2017 *)
  • PARI
    is(n) = ispseudoprime((44^n-1)/43) \\ Felix Fröhlich, Nov 08 2017
  • PFGW
    ABC2 (44^$a-1)/43 // -f{2*$a}
    a: primes from 2 to 1000000
    
Previous Showing 11-12 of 12 results.