login
A278546
Even numbers that cannot be expressed as a sum of 3 or fewer terms of A035928.
0
8, 18, 28, 130, 134, 138, 148, 158, 176, 318, 530, 538, 548, 576, 644, 1300, 2170, 2202, 2212, 2228, 2230, 2248, 8706, 8938, 8948, 34970, 35082
OFFSET
1,1
COMMENTS
This is conjectured to be the complete list. There are no other examples smaller than 16773120.
MATHEMATICA
nn = 10^5; Complement[Range[2, nn, 2], Union@ Map[Total, Rest@ Tuples[{0}~Join~#, 3]] &@ Select[Range@ nn, Function[k, Reverse[# /. {1 -> 0, 0 -> 1}] == # &@ IntegerDigits[k, 2]]]] (* Michael De Vlieger, Nov 23 2016, after Harvey P. Dale at A035928 *)
CROSSREFS
Sequence in context: A352735 A084394 A085248 * A092163 A100592 A028563
KEYWORD
nonn,more
AUTHOR
Jeffrey Shallit, Nov 23 2016
STATUS
approved