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

Author

Jonathan Vos Post, Sep 12 2013

Keywords

• nonn
• base

Comments

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

Crossrefs

Cf. A000045, A030141, A030152, A030144.

Programs

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

Formula

A000045 INTERSECTION A030141.