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.

A307728 Sum of the perimeters of all acute integer triangles with perimeter n.

This page as a plain text file.
%I A307728 #63 Jun 16 2020 14:51:31
%S A307728 0,0,3,0,5,6,7,8,18,20,22,24,39,28,60,48,85,72,95,100,105,132,138,144,
%T A307728 175,182,243,224,290,270,310,320,363,408,420,432,518,494,624,560,697,
%U A307728 672,731,792,810,920,940,960,1078,1100,1224,1196,1325,1404,1430
%N A307728 Sum of the perimeters of all acute integer triangles with perimeter n.
%H A307728 Wikipedia, <a href="https://en.wikipedia.org/wiki/Integer_triangle">Integer Triangle</a>
%F A307728 a(n) = n * A070093(n).
%F A307728 a(n) = n * Sum_{k=1..floor(n/3)} Sum_{i=k..floor((n-k)/2)} (1-sign(floor((n-i-k)^2/(i^2+k^2)))) * sign(floor((i+k)/(n-i-k+1))).
%t A307728 Table[n*Sum[Sum[(1 - Sign[Floor[(n - i - k)^2/(i^2 + k^2)]]) Sign[Floor[(i + k)/(n - i - k + 1)]], {i, k, Floor[(n - k)/2]}], {k, Floor[n/3]}], {n, 100}]
%Y A307728 Cf. A070093.
%K A307728 nonn
%O A307728 1,3
%A A307728 _Wesley Ivan Hurt_, May 15 2019