cp's OEIS Frontend

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.

A098221 a(n) is the smallest number x such that floor(sigma(sigma(x))/x) = n or the A098219(x) quotient equals n.

This page as a plain text file.
%I A098221 #25 Jan 15 2025 01:45:49
%S A098221 1,2,8,6,40,30,24,60,120,480,540,1560,2520,10920,27720,30240,191520,
%T A098221 524160,360360,3243240,5765760,28828800,109549440,438197760,766846080,
%U A098221 3834230400,9081072000,32974381440,147516969600,880887047040,2802822422400
%N A098221 a(n) is the smallest number x such that floor(sigma(sigma(x))/x) = n or the A098219(x) quotient equals n.
%C A098221 a(30) <= 880887047040. a(31) <= 2802822422400. - _Donovan Johnson_, Feb 16 2013
%F A098221 a(n) = Min{x;floor(A051027(x)/x)=n}.
%e A098221 n = 10: a(10) = 480 because floor(sigma(sigma(480))/480) = floor(sigma(1512)/480) = floor(4800/480) = 4800/480 = n = 10.
%t A098221 t=Table[0, {100}];Do[s=g[n];If[s<101&&t[[s]]==0, t[[s]]=n], {n, 1, 1000000}];t
%Y A098221 Cf. A000203, A051027, A008333, A019278, A098219, A098220, A098222, A327630.
%K A098221 nonn,more
%O A098221 1,2
%A A098221 _Labos Elemer_, Oct 25 2004
%E A098221 a(20)-a(26) from _Donovan Johnson_, Dec 29 2008
%E A098221 a(27)-a(29) from _Donovan Johnson_, Feb 16 2013
%E A098221 a(30)-a(31) from _Giovanni Resta_, Feb 27 2020