login
A110538
Row sums of A110537 viewed as a number triangle.
2
1, 2, 4, 6, 9, 16, 25, 42, 78, 152, 317, 706, 1685, 4234, 11173, 30850, 88804, 265936, 826931, 2665434, 8892534, 30664346, 109149206, 400544458, 1513655722, 5884263058, 23508569872, 96437400910, 405880177443
OFFSET
1,2
COMMENTS
Sums of antidiagonals of A110537 when this is viewed as a number square.
LINKS
FORMULA
a(n) = Sum_{k=1..n} Sum_{j=1..min(n-k+1,k)} ceiling(j^(n-k+1)/(n-k+1)^j)*ceiling(j^k/k^j).
MATHEMATICA
T[n_] := Sum[Sum[ Ceiling[j^(n - k + 1)/(n - k + 1)^j]*Ceiling[j^k/k^j], {j, 1, Min[n - k + 1, k]}], {k, 1, n}]; Table[T[n], {n, 1, 50}] (* G. C. Greubel, Aug 31 2017 *)
PROG
(PARI) for(n=1, 25, print1(sum(k=1, n, sum(j=1, min(n-k+1, k), ceil(j^(n-k+1)/(n-k+1)^j)*ceil(j^k/k^j))), ", ")) \\ G. C. Greubel, Aug 31 2017
CROSSREFS
Sequence in context: A318026 A173241 A096398 * A288039 A373639 A327744
KEYWORD
easy,nonn
AUTHOR
Paul Barry, Jul 25 2005
STATUS
approved