A375676 a(n) is the perimeter of the rectangle whose edges are n and A375673(n).

18, 16, 50, 36, 98, 32, 54, 50, 242, 48, 338, 98, 90, 64, 578, 108, 722, 80, 98, 242, 1058, 96, 250, 338, 162, 112, 1682, 150, 1922, 128, 198, 578, 350, 144, 2738, 722, 234, 160, 3362, 196, 3698, 176, 270, 1058, 4418, 192, 686, 250, 306, 208, 5618, 324, 242, 224, 342

Offset: 3

Author

Paolo Xausa, Aug 25 2024

Keywords

• nonn

Links

• Paolo Xausa, Table of n, a(n) for n = 3..1000

Crossrefs

Cf. A375673 (edges), A375674 (area/perimeter) A375675 (area).

Cf. A262767, A329402, A306841.

Programs

Mathematica

A375676[n_] := Module[{b, r}, 2*(SolveValues[2*r == n*b/(n+b) && b >= n, {b, r}, Integers, MaxRoots -> 1][[1,1]] + n)];
Array[A375676, 100, 3]

Formula

a(n) = 2*(n + A375673(n)).

a(n) = A375675(n)/A375674(n).