OFFSET
1,3
MATHEMATICA
(See A191916.)
nn=60; Join[{0}, Take[Union[Select[2#[[1]]-#[[2]]&/@Tuples[LucasL[ Range[ nn]], 2], #>=0&]], nn]] (* Harvey P. Dale, Jan 06 2013 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Clark Kimberling, Jun 19 2011
STATUS
approved