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 A141392 #10 Jul 24 2025 09:28:42
%S A141392 1,5,5,7,14,14,70,70,66,66,462,462,616,616,600,600,750,750,730,730,
%T A141392 876,876,996,996,1162,1162,1582,1554,1554,1638,1638,1872,1872,4368,
%U A141392 4368,4419,4359,4359,13209,13090,13090,12950,12950,12802,12802,16954,16954
%N A141392 a(n) = RMS( A141391(1) through A141391(n) ).
%H A141392 Giovanni Resta, <a href="/A141392/b141392.txt">Table of n, a(n) for n = 1..200</a>
%e A141392 a(4) = 7 because first 4 terms of A141391 are 1,7,5,11 and sqrt(mean(1^2, 7^2, 5^2, 11^2)) = 7.
%t A141392 lim=46;a141391={1};Do[i=1;Until[!MemberQ[a141391,i]&&IntegerQ[RootMeanSquare[Append[a141391,i]]],i++];AppendTo[a141391,i],{n,lim}];a[n_]:=RootMeanSquare[a141391[[1;;n]]];Array[a,lim] (* _James C. McMahon_, Jul 24 2025 *)
%Y A141392 Cf. A141391, A141393, A141394, A140480.
%K A141392 nonn
%O A141392 1,2
%A A141392 _Andrew Weimholt_, Jun 29 2008