OFFSET
1,2
LINKS
Nicolas Bělohoubek, Table of n, a(n) for n = 1..1000
FORMULA
Conjecture: a(n)/n^3 tends to c, where 0.08 < c < 0.1.
PROG
(PARI) avdev(v)={my(n=#v, sav=vecsum(v)/n); sum(k=1, n, abs(v[k]-sav))/n};
a370488(nterms) = {my(v=vector(nterms)); v[1]=1; for (k=2, nterms, for (j=v[k-1]+1, oo, v[k]=j; if (denominator(avdev(v[1..k])) == 1, break))); v};
a370488(52) \\ Hugo Pfoertner, Feb 20 2024
CROSSREFS
KEYWORD
nonn
AUTHOR
Nicolas Bělohoubek, Feb 19 2024
STATUS
approved