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 A213811 #21 Jan 10 2020 05:24:36
%S A213811 1044,1200,2604,2964,4056,4284,4476,7164,7644,9300,9864,10884,14616,
%T A213811 15180,20916,24084,40716,51156,55056,65436,66144,70104,74676,92100,
%U A213811 99060,104580,105804,163944,164700,165780,209604,218400,219660,222540,226656,257040,281676
%N A213811 Numbers k such that k and k^3 are sums of two twin primes.
%C A213811 All terms are multiples of 12.
%H A213811 Amiram Eldar, <a href="/A213811/b213811.txt">Table of n, a(n) for n = 1..10000</a> (terms 1..1000 from Harvey P. Dale)
%F A213811 k/2 +/-1 and also (k^3)/2 +/- 1 are twin primes.
%e A213811 1044=521+523, 1044^3=1137893184=568946591+568946593.
%t A213811 sttpQ[n_]:=Module[{x=(n-2)/2},AllTrue[{x,x+2},PrimeQ]]; Select[Range[ 12,300000,12],sttpQ[#]&&sttpQ[#^3]&] (* The program uses the AllTrue function from Mathematica version 10 *) (* _Harvey P. Dale_, Jul 25 2017 *)
%o A213811 (PARI) isok(n) = !(n % 2) && isprime(n/2-1) && isprime(n/2+1) && isprime(n^3/2-1) && isprime(n^3/2+1); \\ _Michel Marcus_, Oct 19 2013
%Y A213811 Cf. A001043, A074924, A213784, A213789.
%K A213811 nonn
%O A213811 1,1
%A A213811 _Zak Seidov_, Jun 20 2012