OFFSET
1,2
PROG
(PARI) b(n) = my(k=n); while(sigma(k)>sigma(k+1), k++); k-n+1;
a(n) = my(k=1); while(b(k)<n, k++); k;
CROSSREFS
KEYWORD
nonn,more
AUTHOR
Seiichi Manyama, Aug 02 2023
STATUS
approved