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 A151741 #8 Nov 27 2019 13:25:50
%S A151741 18,27,36,45,49,54,63,75,78,81,85,90,95,99,102,105,117,121,126,135,
%T A151741 143,147,150,153,161,165,168,171,175,180,185,189,192,195,203,207,216,
%U A151741 221,225,228,231,235,243,247,255,258,261,265,273,276,279,282,285,289,297
%N A151741 Composite which are the sum of three consecutive composite numbers.
%t A151741 Module[{c=Select[Range[300],CompositeQ],s3},s3=Total/@Partition[c,3,1];Intersection[c,s3]] (* Requires Mathematica version 10 or later *) (* _Harvey P. Dale_, Nov 27 2019 *)
%o A151741 (PARI) c1=4;c2=6;for(c3=8,299,isprime(c3) && next;isprime(c1+c2+c3) || print1(c1+c2+c3",");c1=c2;c2=c3) \\ _M. F. Hasler_, Jun 16 2009
%Y A151741 Cf. A151740-A151745, A060254, A060327, A060339, A096785, A096787, A135170.
%K A151741 nonn
%O A151741 1,1
%A A151741 _Claudio Meller_, Jun 15 2009