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 A272407 #8 Dec 04 2018 07:43:30
%S A272407 7,13,31,37,43,61,67,73,79,97,103,109,127,139,151,157,163,181,193,199,
%T A272407 211,223,229,241,271,277,283,307,313,331,337,349,367,373,379,397,409,
%U A272407 433,463,499,523,541,577,601,607,619,661,757,853,937,1123,1129
%N A272407 Primes p == 1 (mod 3) for which A261029(38*p) = 3.
%C A272407 By theorem in A272382, case q=19, the sequence is finite with a(n)<1444.
%H A272407 Vladimir Shevelev, <a href="http://arxiv.org/abs/1508.05748">Representation of positive integers by the form x^3+y^3+z^3-3xyz</a>, arXiv:1508.05748 [math.NT], 2015.
%t A272407 r[n_] := Reduce[0 <= x <= y <= z && z >= x+1 && n == x^3+y^3+z^3 - 3 x y z, {x, y, z}, Integers];
%t A272407 a261029[n_] := Which[rn = r[n]; rn === False, 0, rn[[0]] === And, 1, rn[[0]] === Or, Length[rn], True, Print["error ", rn]];
%t A272407 Select[Select[Range[1, 1171, 3], PrimeQ], a261029[38 #] == 3&] (* _Jean-François Alcover_, Dec 04 2018 *)
%Y A272407 Cf. A261029, A272381, A272382, A272384, A272404, A272406.
%K A272407 nonn,fini,full
%O A272407 1,1
%A A272407 _Vladimir Shevelev_, Apr 29 2016
%E A272407 All terms (after first author's ones) were calculated by _Peter J. C. Moses_, Apr 29 2016