|
|
A248506
|
|
Lucas numbers that are also triangular numbers.
|
|
2
|
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
All terms are shown, see Theorem 1.1 in the Tengely reference. - Joerg Arndt, Dec 06 2014
|
|
LINKS
|
|
|
EXAMPLE
|
Lucas(18) = 5778 = 107*108/2.
|
|
MATHEMATICA
|
Select[LucasL[Range[20]], OddQ[Sqrt[1+8#]]&] (* Harvey P. Dale, Oct 18 2015 *)
|
|
PROG
|
(PARI)
L0=2; L1=1
{ for(k=1, 10^9,
if ( ispolygonal(L0, 3), print1(L0, ", ") );
[L0, L1] = [L1, L1 + L0];
); }
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,fini,full,bref
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|