OFFSET
1,2
LINKS
Gleb Ivanov, Python program.
MATHEMATICA
a={}; k=1; Do[While[(t=1; While[t<=4&&DuplicateFreeQ[Total/@Subsets[Join[a, {k}], {t}]], t++]; t)<=4, k++]; AppendTo[a, k]; Print@k, 30] (* Giorgos Kalogeropoulos, Dec 02 2021 *)
PROG
(Python) See links.
CROSSREFS
KEYWORD
nonn
AUTHOR
Santanu Banerjee, Nov 29 2021
EXTENSIONS
a(13)-a(26) from Alois P. Heinz, Dec 01 2021
a(27)-a(41) from Gleb Ivanov, Dec 02 2021
STATUS
approved