The OEIS mourns the passing of Jim Simons and is grateful to the Simons Foundation for its support of research in many branches of science, including the OEIS.
login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A273045 Fibonacci numbers with digits in nondecreasing order. 2
0, 1, 1, 2, 3, 5, 8, 13, 34, 55, 89, 144, 233, 377 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,4
COMMENTS
Intersection of A000045 and A009994. - Felix Fröhlich, May 16 2016
Conjecture: The sequence is finite, with 377 being the last term. I have verified the conjecture up to A000045(10^5). - Felix Fröhlich, May 16 2016
Conjecture verified up to Fibonacci(10^8). - Charles R Greathouse IV, May 17 2016
LINKS
MATHEMATICA
Select[Fibonacci@ Range[0, 10^4], Sort@ # == # &@ IntegerDigits@ # &] (* Michael De Vlieger, May 13 2016 *)
PROG
(PARI) is_a009994(n) = digits(n)==vecsort(digits(n))
for(n=0, 1e4, if(is_a009994(fibonacci(n)), print1(fibonacci(n), ", "))) \\ Felix Fröhlich, May 16 2016
(PARI) fibmod(n, m)=lift(((Mod([1, 1; 1, 0], m))^n)[1, 2])
isA009994(n)=my(d=digits(n)); vecsort(d)==d
B1=10^9; B2=10^57;
for(n=1, 1e9, if(isA009994(fibmod(n, B1)) && isA009994(fibmod(n, B2)) && isA009994(F=fibonacci(n)), print1(F", "))) \\ Charles R Greathouse IV, May 17 2016
CROSSREFS
Sequence in context: A115212 A158083 A042163 * A014259 A001129 A281599
KEYWORD
nonn,base
AUTHOR
Omar E. Pol, May 13 2016
EXTENSIONS
Offset adjusted by Felix Fröhlich, May 16 2016
STATUS
approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified May 24 03:29 EDT 2024. Contains 372771 sequences. (Running on oeis4.)