OFFSET
1,1
COMMENTS
21 -> 10101, 233 -> 11101001, 196418 -> 101111111101000010,..
MATHEMATICA
Select[Fibonacci[Range[6! ]], PrimeQ[DigitCount[ #, 2, 0]]&&PrimeQ[DigitCount[ #, 2, 1]]&]
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Vladimir Joseph Stephan Orlovsky, Feb 16 2010
STATUS
approved