A272623 Fibonacci numbers whose first digit is equal to its last digit.

0, 1, 2, 3, 5, 8, 55, 17711, 63245986, 165580141, 498454011879264, 14472334024676221, 1100087778366101931, 298611126818977066918552, 781774079430987230203437, 14028366653498915298923761, 22698374052006863956975682, 36726740705505779255899443, 59425114757512643212875125

Offset

1,3

Links

Chai Wah Wu, Table of n, a(n) for n = 1..513

Mathematica

DeleteDuplicates@ Select[Fibonacci@ Range[0, 125], First@ # == Last@ # &@ IntegerDigits@ # &] (* Michael De Vlieger, May 04 2016 *)

Prog

(PARI) isok(n) = my(d = digits(n)); d[1] == d[#d];
lista(nn) = print1(0, ", "); for (n=2, nn, if (isok(f=fibonacci(n)), print1(f, ", "))); \\ Michel Marcus, May 04 2016

Crossrefs

Cf. A000045, A227858.

Sequence in context: A042937 A045504 A068500 * A042667 A279073 A279074

Adjacent sequences: A272620 A272621 A272622 * A272624 A272625 A272626

Keyword

nonn,base

Author

Chai Wah Wu, May 03 2016

Status

approved