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 A129546 #13 Aug 01 2025 14:47:48
%S A129546 58,61,98,138,193,217,222,233,253,266,338,358,373,393,398,402,453,461,
%T A129546 466,477,481,542,553,557,586,597,602,618,633,646,662,761,822,838,853,
%U A129546 857,877,898,901,913,918,926,941,986,1006,1041,1061,1077,1126,1157,1161
%N A129546 Numbers k such that T(k)+10 is the next prime after T(k), where T(k) = A000217(k).
%H A129546 Harvey P. Dale, <a href="/A129546/b129546.txt">Table of n, a(n) for n = 1..1000</a>
%e A129546 T(58)=1711 and 1711+10=1721 is the least prime > 1711;
%e A129546 T(61)=1891 and 1891+10=1901 is the least prime > 1891.
%t A129546 nptQ[n_]:=Module[{tr=(n(n+1))/2},NextPrime[tr]-tr==10]; Select[ Range[ 1200], nptQ] (* _Harvey P. Dale_, Dec 19 2017 *)
%o A129546 (PARI) isok(n) = t = n*(n+1)/2; nextprime(t+1) == (t + 10); \\ _Michel Marcus_, Oct 13 2013
%Y A129546 Cf. A000217, A129755, A130178.
%K A129546 nonn
%O A129546 1,1
%A A129546 _Zak Seidov_, May 30 2007