OFFSET
1,1
LINKS
Daniel Lignon and Charles R Greathouse IV, Table of n, a(n) for n = 1..10000 (terms up to 148 from Lignon)
PROG
(PARI) integralRMS(v)=my(t=norml2(v)/#v); denominator(t)==1 && issquare(t)
is(n)=my(d=divisors(n)); #d>3 && integralRMS(d[2..#d-1]) \\ Charles R Greathouse IV, Nov 20 2014
CROSSREFS
KEYWORD
nonn
AUTHOR
Daniel Lignon, Nov 20 2014
STATUS
approved