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 A081983 #6 Apr 14 2018 10:26:57 %S A081983 11,13,19,31,41,61,71,101,103,109,127,151,163,199,211,223,241,251,281, %T A081983 313,331,337,379,401,421,433,521,541,601,613,631,661,673,701,881,919, %U A081983 991,1009,1021,1033,1051,1063,1123,1151,1201,1213,1231,1303,1321,1481 %N A081983 Primes p such that p-1 is divisible by every nonzero digit of p. %H A081983 Harvey P. Dale, <a href="/A081983/b081983.txt">Table of n, a(n) for n = 1..1000</a> %e A081983 127 is a member as 126 is divisible by 1, 2 and 7. %t A081983 Select[Prime[Range[250]],And@@Divisible[#-1,Select[IntegerDigits[ #], #!=0&]]&] (* _Harvey P. Dale_, Apr 14 2018 *) %Y A081983 Cf. A081981, A081982, A081984, A081986, A081987. %K A081983 base,nonn %O A081983 1,1 %A A081983 _Amarnath Murthy_, Apr 04 2003 %E A081983 More terms from Antonio G. Astudillo (afg_astudillo(AT)lycos.com), Apr 06 2003