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

A178083 Numbers k for which 10k+1, 10k+3, 10k+7, 10k+9, 10k+13 and 10k+19 are primes.

Original entry on oeis.org

1, 148, 16570, 32614, 66109, 102250, 106870, 124636, 146140, 191773, 305887, 415591, 421828, 552700, 834415, 1013440, 1176505, 1190050, 1306432, 1572082, 1576009, 1850437, 1873684, 1912954, 1921144, 2004997, 2103613, 2376340
Offset: 1

Views

Author

Roger L. Bagula, May 19 2010

Keywords

Comments

Subsequence of A178084 and of A007811.

Examples

			Associated prime 6-plets are:
11, 13, 17, 19, 23, 29;   # from k=1
1481, 1483, 1487, 1489, 1493, 1499; # from k=148
165701, 165703, 165707, 165709, 165713, 165719; # from k=16570
326141, 326143, 326147, 326149, 326153, 326159; # from k=32614
		

Crossrefs

Cf. A007811.

Programs

  • Magma
    [n: n in [0..1000]| IsPrime(10*n+1) and IsPrime(10*n+3) and IsPrime(10*n+7) and IsPrime(10*n+9) and IsPrime(10*n+13) and IsPrime(10*n+19)] // Vincenzo Librandi, Nov 30 2010
  • Mathematica
    Flatten[Table[If[PrimeQ[10* n + 1] && PrimeQ[10*n + 3] && PrimeQ[10*n + 7] && PrimeQ[10*n + 9] && PrimeQ[10*(n + 1) + 3] && PrimeQ[10*(n + 1) + 9], n, {}], {n, 0, 200000}]]

Extensions

More terms from Zak Seidov, D. S. McNeil and Vincenzo Librandi, May 22 2010
Showing 1-1 of 1 results.