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 A133266 #7 Feb 15 2020 17:43:45
%S A133266 30,32,33,52,60,63,90,120,150,180,210,240,270,300,330,360,390,420,450,
%T A133266 480,510,540,570,600,630,660,690,720,750,780
%N A133266 a(1) = 30; for n >= 2, choose smallest a(n) so that no sum of 2 or more terms equals a prime.
%F A133266 a(n+1) = a(n) + 30 for n >= 7 (conjectured). - _Chai Wah Wu_, Feb 15 2020
%t A133266 (* first do *) Needs [ "Combinatorica`" ] (* then *) lst = {30}; g [ k_ ] := Block [ {j = 1, l = 2^Length@ lst}, While [ j < l && !PrimeQ [ Plus @@ NthSubset [ j, lst ] + k ], j++ ]; If [ j == l, False, True ] ]; f [ n_ ] := Block [ {k = lst [ [ -1 ] ] + 1}, While [ g@k == True, k++ ]; AppendTo [ lst, k ]; k ]; Do [ Print@ f@n, {n, 30} ]
%Y A133266 Cf. A052349, A133660, A133661.
%K A133266 nonn,more
%O A133266 1,1
%A A133266 _Robert G. Wilson v_, Jan 01 2008