This site is supported by donations to The OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A039673 Twin Fibonacci-lucky numbers. 3
 2, 4, 5, 7, 11, 13, 23, 25, 38, 40, 50, 52, 56, 58, 59, 61, 74, 76, 86, 88, 101, 103, 104, 106, 122, 124, 131, 133, 149, 151, 164, 166, 173, 175, 185, 187, 200, 202, 236, 238, 248, 250, 254, 256, 266, 268, 275, 277, 281, 283, 308, 310, 329, 331, 344, 346, 380 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,1 COMMENTS See A039672 for definition. LINKS MAPLE Contribution from R. J. Mathar, Oct 10 2010: (Start) A039672 := proc(nmax) L := [seq(i, i=1..nmax)] ; for itr from 1 do if itr+1 > nops(L) then return L; end if; str := op(itr, L)+op(itr+1, L) ; for i from floor(nops(L)/str) to 1 by -1 do L := subsop(str*i=NULL, L) ; end do: print(L) ; end do: end proc: L := A039672(600) ; for i from 1 to nops(L)-1 do if op(i, L) = op(i+1, L)-2 then printf("%d, %d, ", op(i, L), op(i+1, L)) ; fi; end do: (End) CROSSREFS Cf. A039672 - Lower terms: A039693, upper terms: A039694, middle terms: A039695. Sequence in context: A110924 A192590 A028289 * A097581 A090614 A171022 Adjacent sequences:  A039670 A039671 A039672 * A039674 A039675 A039676 KEYWORD nonn,changed AUTHOR EXTENSIONS Corrected from a(25) on by R. J. Mathar, Oct 10 2010 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Transforms | Puzzles | Hot | Classics
Recent Additions | More pages | Superseeker | Maintained by The OEIS Foundation Inc.

Content is available under The OEIS End-User License Agreement .