OFFSET
1,2
MATHEMATICA
(* support function a240542[] is defined in A240542 *)
a[n_] := Union[Map[a240542, Range[n]]]
a[175] (* data *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Hartmut F. W. Hoft, Feb 06 2017
STATUS
approved