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 A133645 #6 Apr 19 2025 18:03:51
%S A133645 2,5,15,77,187,345,551,1107,1457,1855,2301,3337,4565,5251,6767,7597,
%T A133645 8475,11397,12467,14751,18537,19895,21301,24257,25807,34277,36115,
%U A133645 38001,41917,43947,46025,48151,52547,57135,64377,66887,80157,82955,85801
%N A133645 Integers arising in A133677.
%H A133645 Robert Price, <a href="/A133645/b133645.txt">Table of n, a(n) for n = 1..10018</a>
%t A133645 Union[Table[If[IntegerQ[Prime[n]*(2*Prime[n] - 1)/3], Prime[n]*(2*Prime[n] - 1)/3, {}], {n, 1, 100}]]
%K A133645 nonn
%O A133645 1,1
%A A133645 _Roger L. Bagula_, Dec 28 2007