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.

A199306 Palindromic primes in the sense of A007500 with digits '0', '1' and '6' only.

This page as a plain text file.
%I A199306 #15 Sep 08 2022 08:46:00
%S A199306 11,101,1061,1601,10061,10601,11161,16001,16061,16111,16661,101611,
%T A199306 106661,116101,166601,1011601,1016011,1016611,1061101,1066111,1106101,
%U A199306 1110611,1111661,1116601,1160111,1160611,1166101,1600061,1611161,1616161,1660661,1661111,10011101,10100161,10106111
%N A199306 Palindromic primes in the sense of A007500 with digits '0', '1' and '6' only.
%C A199306 All terms start and end with the digit '1'. This fact is used in the given PARI program.
%o A199306 (PARI) a(n=50,list=0,L=[0,1,6])={ for(d=1,1e9, my(t,u=vector(d-1,i,10^(d-i))~,o=10^d+1);forvec(v=vector(#u,i,[1,#L]),isprime(t=o+vector(#u,i,L[v[i]])*u) || next; isprime(A004086(t)) || next; list & print1(t", "); n-- || return(t)))}  \\ _M. F. Hasler_, Nov 07 2011
%o A199306 (Magma) [p: p in PrimesUpTo(10^8) | Set(Intseq(p)) subset [0,1,6] and IsPrime(Seqint(Reverse(Intseq(p))))]; // _Bruno Berselli_, Nov 07 2011
%Y A199306 Cf. A020449 - A020472, A062350, A087510 - A087515, A199325 - A199329.
%K A199306 nonn,base
%O A199306 1,1
%A A199306 _M. F. Hasler_, Nov 06 2011