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.

A164517 Primes of the form 1+A162143(k).

This page as a plain text file.
%I A164517 #3 Mar 31 2012 12:38:26
%S A164517 4357,12101,16901,28901,52901,164837,184901,220901,224677,417317,
%T A164517 427717,682277,792101,820837,894917,972197,1020101,1110917,1136357,
%U A164517 1144901,1223237,1313317,1552517,1887877,1943237,1976837,2056357,2464901
%N A164517 Primes of the form 1+A162143(k).
%C A164517 Primes p such that p-1 equals the square of a product of three distinct primes.
%C A164517 Primes of the similar form A162143(k)-1 do not exist, because A162143 are squares
%C A164517 which allows for the obvious factorization A162143(k)-1 = (A007304(k)+1)*(A007304(k)-1).
%e A164517 For p=4357=a(1), p=14356=2^2*3^2*11^2. For p=12101, p=1=12100=2^2*5^2*11^2.
%t A164517 f[n_]:=FactorInteger[n][[1,2]]==2&&Length[FactorInteger[n]]==3&&FactorInteger[n][[2, 2]]==2&&FactorInteger[n][[3,2]]==2; lst={};Do[p=Prime[n];If[f[p-1], AppendTo[lst,p]],{n,2,9!}];lst
%K A164517 nonn
%O A164517 1,1
%A A164517 _Vladimir Joseph Stephan Orlovsky_, Aug 14 2009
%E A164517 Edited by _R. J. Mathar_, Aug 18 2009