Search: id:A120367 Results 1-1 of 1 results found. %I A120367 %S A120367 1,2,3,5,7,10,13,16,19,22,25,28,31,36,41,46,51,56,61,66,71,76,81,86,91, %T A120367 96,101,106,111,117,123,129,135,141,147,153,159,165,171,177,183,189,195, %U A120367 201,207,213,219,225,231,237,243,249,255,263,271,279,287,295,303,311 %N A120367 a(1) = 1. a(n) = a(n-1) + (maximum number of 1's occurring in the binary representation of any of the sequence's earlier terms). %H A120367 Leroy Quet, Home Page (listed in lieu of email address) %e A120367 When considering the first 14 terms of the sequence, a(13) = 31 has the most number of 1's in its binary representation, 5 ones. So a(15) = a(14) + 5 = 41. %p A120367 A000120 := proc(n) local br,i; br := convert(n,base,2); sum(op(i,br), i=1..nops(br)); end: A120367 := proc(nmax) local a,bmax,anew; a := [1]; bmax := 1; while nops(a) < nmax do anew := op(-1,a)+bmax; a := [op(a),anew]; bmax := max(bmax,A000120(anew)); od; RETURN(a); end; print(A120367(80) ); - R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Dec 16 2006 %Y A120367 Cf. A000120. %Y A120367 Sequence in context: A162999 A064509 A096221 this_sequence A072831 A072388 A101433 %Y A120367 Adjacent sequences: A120364 A120365 A120366 this_sequence A120368 A120369 A120370 %K A120367 nonn %O A120367 1,2 %A A120367 Leroy Quet Jun 26 2006 %E A120367 More terms from R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Dec 16 2006 Search completed in 0.001 seconds