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 A176905 #4 Mar 31 2012 12:38:36 %S A176905 5,11,17,19,31,37,41,43,53,59,61,71,73,79,83,97,101,103,127,131,151, %T A176905 173,191,193,227,233,251,263,269,271,293,313,337,347,349,353,359,367, %U A176905 373,379,383,389,401,419,421,431,433,439,443,461,467,487,491,499,503,521 %N A176905 Primes p such that p^p contains the string 'p' as a substring. %C A176905 17^17=827240261886336764"17"7, 19^19="19"784"19"655660313589123979,.. %H A176905 N. J. A. Sloane, <a href="/A176905/b176905.txt">Table of n, a(n) for n = 1..8114</a> [Computed using the Mma program] %t A176905 okQ[n_]:=Module[{idn=IntegerDigits[n], len, idp=IntegerDigits[n^n]}, len=Length[idn];Length[Flatten[Position[Partition[idp, len, 1], idn]]]>=1]; Select[Prime[Range[250]], okQ] %Y A176905 Cf. A169753, A169754, A049329. %K A176905 nonn,base %O A176905 1,1 %A A176905 _Harvey P. Dale_ & _Vladimir Joseph Stephan Orlovsky_, Apr 28 2010, May 01 2010