A141392 a(n) = RMS( A141391(1) through A141391(n) ).

1, 5, 5, 7, 14, 14, 70, 70, 66, 66, 462, 462, 616, 616, 600, 600, 750, 750, 730, 730, 876, 876, 996, 996, 1162, 1162, 1582, 1554, 1554, 1638, 1638, 1872, 1872, 4368, 4368, 4419, 4359, 4359, 13209, 13090, 13090, 12950, 12950, 12802, 12802, 16954, 16954

Offset: 1

Author

Andrew Weimholt, Jun 29 2008

Keywords

• nonn

Examples

			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.
		

Links

• Giovanni Resta, Table of n, a(n) for n = 1..200

Crossrefs

Cf. A141391, A141393, A141394, A140480.

Programs

Mathematica

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 *)