cp's OEIS Frontend

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.

Showing 1-2 of 2 results.

A256094 Alternating row sums of array A255250.

Original entry on oeis.org

1, 2, 2, 3, 4, 3, 4, 5, 4, 6, 7, 7, 8, 8, 7, 8, 8, 10, 10, 12, 13, 14, 11, 13, 13, 11, 14, 16, 15, 18, 17, 16, 15, 17, 17, 20, 20, 23, 23, 21, 21, 21, 19, 23, 22, 24, 26, 26, 23, 25, 24, 28, 29, 31, 30, 32, 29, 31, 28, 29, 31
Offset: 0

Views

Author

Wolfdieter Lang, Mar 14 2015

Keywords

Comments

See A255250 for a comment on Gauss's circle problem in an octant and a link.

Crossrefs

Cf. A255250.

Formula

a(n) = sum((-1)^m*T(n, m), m=0..floor(n/sqrt(2))), n >= 0, with T(n, m) = A255250(n, m) = floor(sqrt(n^2 - m^2)) - (m-1).

A036702 a(n)=number of Gaussian integers z=a+bi satisfying |z|<=n, a>=0, 0<=b<=a.

Original entry on oeis.org

1, 2, 4, 7, 10, 15, 20, 25, 32, 40, 49, 57, 66, 78, 89, 102, 114, 128, 142, 158, 175, 190, 209, 227, 245, 267, 288, 310, 331, 354, 379, 402, 429, 455, 483, 512, 538, 569, 597, 631, 663, 693, 727, 761, 798, 834, 868, 906, 943, 983
Offset: 0

Views

Author

Keywords

Comments

Row sums of the irregular triangle A255250. - Wolfdieter Lang, Mar 15 2015

Crossrefs

Programs

  • Maple
    A036702 := proc(n)
            local a,x,y ;
            a := 0 ;
            for x from 0 do
                    if x^2 > n^2 then
                            return a;
                    fi ;
                    for y from 0 to x do
                            if y^2+x^2 <= n^2 then
                                    a := a+1 ;
                            end if;
                    end do;
            end do:
    end proc: # R. J. Mathar, Oct 29 2011
  • Mathematica
    a[n_] := Module[{a, b}, If[n == 0, 1, Reduce[a^2 + b^2 <= n^2 && a >= 0 && 0 <= b <= a, {a, b}, Integers] // Length]];
    a /@ Range[0, 49] (* Jean-François Alcover, Oct 17 2019 *)

Formula

a(n) - A036700(n) = 1+A049472(n). - R. J. Mathar, Oct 29 2011
a(n) = sum(floor(sqrt(n^2 - m^2)) - (m-1), m = 0.. floor(n/sqrt(2))), n >= 0. See A255250. - Wolfdieter Lang, Mar 15 2015
Showing 1-2 of 2 results.