Thank you! I see the but I am currently not able to transform it to
{0,0,0,1,1,0,0,0,1,1,1}
I tried:
f[x_] := (If[x == 0, 0, 1])
BitsOfList = f /@ ListOfValuesAndFunctions
The outcome is unfortunatly
{0, 0, 0, If[2^t == 0, 0, 1], If[2^t == 0, 0, 1], 0, 0, 0,
If[2^t == 0, 0, 1], If[2^t == 0, 0, 1], If[2^t == 0, 0, 1]}