login
A272623
Fibonacci numbers whose first digit is equal to its last digit.
2
0, 1, 2, 3, 5, 8, 55, 17711, 63245986, 165580141, 498454011879264, 14472334024676221, 1100087778366101931, 298611126818977066918552, 781774079430987230203437, 14028366653498915298923761, 22698374052006863956975682, 36726740705505779255899443, 59425114757512643212875125
OFFSET
1,3
LINKS
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
Sequence in context: A042937 A045504 A068500 * A042667 A279073 A279074
KEYWORD
nonn,base
AUTHOR
Chai Wah Wu, May 03 2016
STATUS
approved