[go: up one dir, main page]

login
A191931
Ordered sequence of nonnegative differences 4f-g, where f and g are Lucas numbers (A000032 beginning at 1).
3
0, 1, 3, 5, 8, 9, 10, 11, 12, 13, 15, 17, 21, 24, 25, 26, 27, 33, 37, 40, 41, 43, 54, 61, 65, 68, 69, 71, 87, 98, 105, 109, 112, 113, 115, 141, 159, 170, 177, 181, 184, 185, 187, 228, 257, 275, 286, 293, 297, 300, 301, 303, 369, 416, 445, 463, 474, 481, 485
OFFSET
1,3
MATHEMATICA
(See A191929.)
Take[Union[Select[4First[#]-Last[#]&/@Tuples[LucasL[Range[20]], {2}], #>=0&]], 70] (* Harvey P. Dale, Aug 21 2011 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Clark Kimberling, Jun 19 2011
STATUS
approved