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 A161689 #6 Nov 27 2019 13:29:33
%S A161689 49,99,153,161,171,175,185,189,221,231,235,243,247,265,285,289,319,
%T A161689 329,341,351,369,375,391,405,429,435,441,469,473,495,507,517,531,535,
%U A161689 545,549,581,589,603,609,639,645,651,657,667,671,679,689,711,715,725,729
%N A161689 Intersection of A151740 and A151741.
%C A161689 Composite numbers that are sum of two and three consecutive composite numbers. Provably only odd integers.
%H A161689 Harvey P. Dale, <a href="/A161689/b161689.txt">Table of n, a(n) for n = 1..1000</a>
%e A161689 49=24+25=15+16+18
%e A161689 99=49+50=32+33+34
%e A161689 153=76+77=50+51+52.
%t A161689 Module[{c=Select[Range[800],CompositeQ],s2,s3},s2=Total/@Partition[c,2,1];s3=Total/@Partition[c,3,1];Intersection[c,s2,s3]] (* Requires Mathematica version 10 or later *) (* _Harvey P. Dale_, Nov 27 2019 *)
%Y A161689 A151740, A151741, A151745.
%K A161689 nonn
%O A161689 1,1
%A A161689 _Zak Seidov_, Jun 17 2009