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 A056904 #9 Dec 02 2021 13:42:55
%S A056904 0,0,1,2,7,9,12,30,45,51,57,84,92,135,176,187,222,301,315,376,392,442,
%T A056904 551,570,651,759,782,900,1001,1107,1162,1305,1395,1552,1717,1785,1926,
%U A056904 1962,2262,2301,2460,2501,2667,2709,2926,2970,3151,3197,3432,3577,3825
%N A056904 Floor[p/24] where p is a prime which is 4 more than a square.
%F A056904 a(n) =floor[A005473(n)/24]
%e A056904 a(2)=1 since 29 is a prime which is four more than a square and floor[29/24]=1
%t A056904 Join[{0},Floor[#/24]&/@Select[Prime[Range[10000]],#-Floor[Sqrt[#]]^2 == 4&]] (* _Harvey P. Dale_, Oct 25 2011 *)
%t A056904 With[{nn=400},Floor[#/24]&/@Select[Range[nn]^2+4,PrimeQ]] (* _Harvey P. Dale_, Dec 02 2021 *)
%Y A056904 a(n) is contained in A001840. A005473(n)=24*a(n)+m, where m=13 if a(n) is three times a triangular number (and n>0) i.e. in A045943 and m=5 if A056904(n) is not three times a triangular number (or n=0) i.e. in A001318.
%K A056904 nonn
%O A056904 0,4
%A A056904 _Henry Bottomley_, Jul 06 2000