A229040 Fibonacci numbers in which parity of the decimal digits alternates.

0, 1, 2, 3, 5, 8, 21, 34, 89, 610, 987, 4181, 6765

Offset

1,3

Comments

No more values through F(19000). - R. J. Mathar, Jun 30 2020

Links

Table of n, a(n) for n=1..13.

Formula

A000045 INTERSECTION A030141.

Maple

isA030141 := proc(n)
    dgs := convert(n, base, 10) ;
    for i from 2 to nops(dgs) do
        if modp(op(i, dgs), 2) = modp(op(i-1, dgs), 2) then
            return false;
        end if;
    end do:
    true ;
end proc:
for i from 0 do
    f := combinat[fibonacci](i) ;
    if isA030141(f) then
        print(f) ;
    end if;
end do: # R. J. Mathar, Mar 13 2015

Crossrefs

Cf. A000045, A030141, A030152, A030144.

Sequence in context: A002363 A041457 A161468 * A143873 A273046 A117774

Adjacent sequences: A229037 A229038 A229039 * A229041 A229042 A229043

Keyword

nonn,base

Author

Jonathan Vos Post, Sep 12 2013

Status

approved