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.

A063639 Primes of the form p*q*r - 1, where p, q and r are primes (not necessarily distinct).

This page as a plain text file.
%I A063639 #20 Jun 28 2018 04:49:14
%S A063639 7,11,17,19,29,41,43,67,97,101,109,113,137,163,173,181,211,229,241,
%T A063639 257,281,283,317,331,337,353,373,401,409,433,523,547,577,601,617,641,
%U A063639 653,677,691,709,761,787,821,829,853,907,937,941,977,1009,1021,1033,1051
%N A063639 Primes of the form p*q*r - 1, where p, q and r are primes (not necessarily distinct).
%H A063639 Harry J. Smith, <a href="/A063639/b063639.txt">Table of n, a(n) for n = 1..1000</a>
%t A063639 Take[Select[Union[Times@@#-1&/@Tuples[Prime[Range[60]],3]],PrimeQ],60] (* _Harvey P. Dale_, Jan 23 2012 *)
%o A063639 (PARI) { n=0; for (m=1, 10^9, p=prime(m); if (bigomega(p + 1) == 3, write("b063639.txt", n++, " ", p); if (n==1000, break)) ) } \\ _Harry J. Smith_, Aug 26 2009
%o A063639 (Haskell)
%o A063639 a063639 n = a063639_list !! (n-1)
%o A063639 a063639_list = [p | p <- a000040_list, a001222 (p+1) == 3]
%o A063639 -- _Reinhard Zumkeller_, Feb 04 2012
%Y A063639 Cf. A014612, A063640.
%Y A063639 Cf. A000040, A001222.
%K A063639 nonn
%O A063639 1,1
%A A063639 _Reinhard Zumkeller_, Jul 21 2001