Search: id:A098871 Results 1-1 of 1 results found. %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 Search completed in 0.001 seconds