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.

A307867 Numbers m such that K(m)/m > K(j)/j for all j < m, where K(m) is the Kalmár function (A074206).

This page as a plain text file.
%I A307867 #10 May 07 2019 16:33:11
%S A307867 1,72,96,144,240,288,480,576,720,1152,1440,2880,4320,5760,8640,11520,
%T A307867 17280,34560,51840,69120,103680,138240,207360,241920,311040,345600,
%U A307867 362880,414720,483840,622080,725760,829440,967680,1244160,1451520,1935360,2073600,2419200
%N A307867 Numbers m such that K(m)/m > K(j)/j for all j < m, where K(m) is the Kalmár function (A074206).
%C A307867 Subsequence of A307866.
%H A307867 Amiram Eldar, <a href="/A307867/b307867.txt">Table of n, a(n) for n = 1..393</a>
%t A307867 a[0] = 0; a[1] = 1; a[n_] := a[n] = Total[a /@ Most[Divisors[n]]]; am = -1; s={}; Do[a1 = a[n]/n; If[a1 > am, AppendTo[s, n]; am = a1], {n, 1, 10000}]; s
%Y A307867 Cf. A004394, A163272, A307866.
%K A307867 nonn
%O A307867 1,2
%A A307867 _Amiram Eldar_, May 02 2019