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.
%I A277995 #6 Nov 27 2016 21:44:26 %S A277995 3,5,353,32732237,35225327,75527537,75535277,75557723,75737723, %T A277995 75755257,77322233,77752733,322375577,322775737,325725577,325773727, %U A277995 337735553,352272233,355322777,357333377,357735773,372577727,372753727,375577733,375722377,375727237,377725723,377752723 %N A277995 Primes with prime subscripts whose digits are primes, whose digital root is prime, whose sum of digits is prime and whose reversal is also prime. %C A277995 Intersection of A006450, A007500, A019546, A028834 and A078403. %e A277995 32732237 is in the sequence because 32732237 is the 2016197-th prime number, 2016197 is prime, digits 2, 3 and 7 are primes, 32732237 -> 3 + 2 + 7 + 3 + 2 + 2 + 3 + 7 = 29 (is prime) -> 2 + 9 = 11 -> 1 + 1 = 2, 2 is prime and 73223723 is also prime. %t A277995 Select[Table[Prime[Prime[n]], {n, 1500000}], Complement[IntegerDigits[#1], {2, 3, 5, 7}] == {} && PrimeQ[#1 - 9 Floor[(#1 - 1)/9]] && PrimeQ[Total[IntegerDigits[#1]]] && PrimeQ[FromDigits[Reverse[IntegerDigits[#1]]]] & ] %Y A277995 Cf. A000040, A006450, A007500, A019546, A028834, A078403, A087368. %K A277995 nonn,base %O A277995 1,1 %A A277995 _Ilya Gutkovskiy_, Nov 08 2016