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 A141280 #11 Mar 01 2018 14:36:12 %S A141280 233,353,977,1663,2693,4457,5443,11933,20107,23333,23893,41263,108923, %T A141280 110813,294347,554633,730783,748603,851387,928643,1005013,1008193, %U A141280 1020043,1150873,1194763,1326313,1427963,1477103,2161337,2212003 %N A141280 Primes p such that p-6^3, p-6^2, p-6, p, p+6, p+6^2 and p+6^3 are primes. %C A141280 Subsequence of A006489 and A141279. A141281 is a subsequence. %H A141280 Rick L. Shepherd, <a href="/A141280/b141280.txt">Table of n, a(n) for n = 1..1000</a> %t A141280 p6Q[n_]:=With[{c=6^Range[3]},AllTrue[Join[n+c,n-c],PrimeQ]]; Select[ Prime[ Range[ 50,200000]],p6Q] (* The program uses the AllTrue function from Mathematica version 10 *) (* _Harvey P. Dale_, Jun 06 2015 *) %Y A141280 Cf. A006489, A141279, A141281, A141282. %K A141280 nonn %O A141280 1,1 %A A141280 _Rick L. Shepherd_, Jun 21 2008