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 A134641 #7 Dec 14 2015 17:54:20
%S A134641 2,5,7,11,19
%N A134641 Prime permutational numbers A134640.
%C A134641 Conjecture: This sequence is finite and complete.
%C A134641 The conjecture is correct: in base 2k permutational numbers are divisible by 2k-1 and in base 2k+1 permutational numbers are divisible by k. Hence it suffices to check bases up to 3. - _Charles R Greathouse IV_, Dec 14 2015
%t A134641 a = {}; b = {}; Do[AppendTo[b, n]; w =Permutations[b]; Do[j = FromDigits[w[[m]], n + 1]; If[PrimeQ[j], AppendTo[a, j]], {m, 1, Length[w]}], {n, 0, 10}]; a (*Artur Jasinski*)
%o A134641 (PARI) for(b=2,3, for(i=0,b!-1, p=fromdigits(apply(j->j-1, numtoperm(b,i)),b); if(isprime(p), print1(p", ")))) \\ _Charles R Greathouse IV_, Dec 14 2015
%Y A134641 Cf. A134640.
%K A134641 nonn,fini,full
%O A134641 1,1
%A A134641 _Artur Jasinski_, Nov 05 2007