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 A093724 #7 Aug 05 2025 21:40:02
%S A093724 109,1,34,2,6,11,5,26,35,17,13,33,75,21,55,24,68,45,79,148,202,236,
%T A093724 261,230,193,330,481,524,771,227,618,1042,327,1051,1128,687,966,632,
%U A093724 1624,2646,3739,2392,841,752,2677,2785,3819,3200,3598,1706,6974,9479,9907
%N A093724 First occurrence of n in A093723, or -1 if n does not occur.
%e A093724 a(4) = 109 since A092613(110) - A092613(109) = 3191+2963+2927+3119 - 3181-2953-2917-3109 = 12200 - 12160 = 40.
%t A093724 t = Table[ A092613[n]/10, {n, 10000}]; d = Drop[t, 1] - Drop[t, -1]; f[n_] := Position[d, n, 1, 1]; Flatten[ Table[ f[n], {n, 4, 59}]]
%Y A093724 Cf. A092614, A093723.
%K A093724 nonn
%O A093724 4,1
%A A093724 _Robert G. Wilson v_, Apr 13 2004