A178356 - OEIS

A178356

Fibonacci numbers whose successive digits decrease by 1.

0, 1, 2, 3, 5, 8, 21, 987

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,3

COMMENTS

Only need to consider the Fibonacci numbers less than 9876543210.

LINKS

FORMULA

{ A000045 } intersect { A138142 }. - Alois P. Heinz, Jul 05 2022

MATHEMATICA

Join[{0, 1, 2, 3, 5, 8}, Select[Fibonacci[Range[250]], Union[Differences[ IntegerDigits[#]]]=={-1}&]] (* Harvey P. Dale, Sep 14 2011 *)

PROG

(PARI) n=0; while((f=fibonacci(n))<=9876543210, if(is(f), print1(f", ")); n++) \\ Charles R Greathouse IV, Sep 14 2011

CROSSREFS

KEYWORD

nonn,base,fini,full

AUTHOR

EXTENSIONS

Definition clarified by Harvey P. Dale, Sep 14 2011

STATUS

approved