|
|
A050761
|
|
Numbers k such that the decimal expansion of the k-th Fibonacci number contains no pair of consecutive equal digits (probably finite).
|
|
1
|
|
|
1, 2, 3, 4, 5, 6, 7, 8, 9, 11, 15, 16, 17, 18, 19, 20, 21, 23, 24, 25, 26, 27, 30, 31, 32, 33, 36, 37, 39, 42, 47, 48, 50, 54, 57, 58, 61, 68, 70, 80, 86, 107, 134, 147, 151, 177
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
LINKS
|
|
|
MATHEMATICA
|
Select[Range[200], FreeQ[Differences[IntegerDigits[Fibonacci[#]]], 0]&] (* Harvey P. Dale, Sep 04 2024 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base,changed
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|