This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A246637 #4 Sep 03 2014 14:39:28
%S A246637 1,1,3,1533,4870483401,10632494904416274948861848751148863,
%T A246637 442778652527729430645666843207235634221292901,
%U A246637 8594831104112238244501123836952492157088005557663896974587707618787108,970692073484990407927190417652798419153
%N A246637 Integers of the form (2^(k+1) - 1)/C(k+2,2).
%C A246637 The numbers k for which (2^(k+1) - 1)/C(k+2,2) is an integer are given by A246636. For each such k, (2^(k+1) - 1)/C(k+2,2) is the mean of the numbers in all the rows of Pascal's triangle, from row 0 through row k.
%e A246637 The sum of the numbers in Pascal's triangle, from row 0 through row 17, is 2^18 - 1 = 262143; the number of such numbers is C(19,2) = 171, and 262143/171 = 1533; thus is in A246637 and 17 is in A246636.
%t A246637 z = 3000; t = Select[Range[0, z], IntegerQ[(2^(# + 1) - 1)/Binomial[# + 2, 2]] &] (* A246636 *)
%t A246637 Table[(2^(t[[n]] + 1) - 1)/Binomial[t[[n]] + 2, 2], {n, 1, 10}] (*A246637*)
%Y A246637 Cf. A246636, A007318.
%K A246637 nonn,easy
%O A246637 1,3
%A A246637 _Clark Kimberling_, Sep 01 2014