A173347 Fibonacci numbers with both a prime number of 0's and a prime number of 1's in their binary representations.
21, 233, 196418, 9227465, 165580141, 2971215073, 53316291173, 2504730781961, 3416454622906707, 51680708854858323072, 184551825793033096366333, 898923707008479989274290850145, 3210056809456107725247980776292056
Offset: 1
Programs
-
Mathematica
Select[Fibonacci[Range[6! ]],PrimeQ[DigitCount[ #,2,0]]&&PrimeQ[DigitCount[ #,2,1]]&]
Comments