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 A108933 #5 Dec 15 2017 17:36:51 %S A108933 3,14,20,24,25,30,37,43,50,53,59,60,67,73,79,80,97,100,105,110,115, %T A108933 124,125,134,138,146,151,152,158,171,172,198,201,202,225,227,235,243, %U A108933 249,250,255,259,260,265,295,301,302,306,314,318,320,325,327,330,343,347 %N A108933 Numbers n such that the absolute value of (n - sum of the factorials of its digits) is prime. %C A108933 6*10^843-1 generates an 844-digit prime. %H A108933 Harvey P. Dale, <a href="/A108933/b108933.txt">Table of n, a(n) for n = 1..1000</a> %e A108933 a(5)=25 because |25-(2!+5!)| = 97, a prime. %t A108933 Select[Range[400],PrimeQ[Abs[#-Total[IntegerDigits[#]!]]]&] (* _Harvey P. Dale_, Oct 03 2017 *) %Y A108933 Cf. A108911. %K A108933 base,easy,nonn %O A108933 1,1 %A A108933 _Jason Earls_, Jul 20 2005