%I A098871
%S A098871 1,2,5,6,17,18,21,22,65,66,69,70,81,82,85,86,257,258,261,262,273,274,
%T A098871 277,278,321,322,325,326,337,338,341,342,1025,1026,1029,1030,1041,1042,
%U A098871 1045,1046,1089,1090,1093,1094,1105,1106,1109,1110,1281,1282,1285,1286
%N A098871 Sums of distinct powers of 4, translated by 1.
%t A098871 (* first do *) Needs["DiscreteMath`Combinatorica`"]; (* then *) Take[ 
               Sort[ Plus @@@ Subsets[ Table[4^n, {n, 0, 5}]]] + 1, 50] (from Robert 
               G. Wilson v Oct 23 2004)
%Y A098871 Cf. A003278.
%Y A098871 Sequence in context: A048290 A029939 A082198 this_sequence A146477 A166753 
               A014454
%Y A098871 Adjacent sequences: A098868 A098869 A098870 this_sequence A098872 A098873 
               A098874
%K A098871 nonn
%O A098871 0,2
%A A098871 tom c brown (tbrown(AT)sfu.ca), Oct 13 2004
%E A098871 More terms from Robert G. Wilson v (rgwv(AT)rgwv.com), Oct 23 2004