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.

A343945 a(1) = 1; for n >= 2, a(n) = floor(log(sigma(n)) / log(tau(n))).

This page as a plain text file.
%I A343945 #15 Sep 08 2022 08:46:26
%S A343945 1,1,2,1,2,1,3,1,2,2,3,1,3,2,2,2,4,2,4,2,2,2,4,1,3,2,2,2,4,2,5,2,2,2,
%T A343945 2,2,5,2,2,2,5,2,5,2,2,3,5,2,3,2,3,2,5,2,3,2,3,3,5,2,5,3,2,2,3,2,6,2,
%U A343945 3,2,6,2,6,3,2,2,3,2,6,2,2,3,6,2,3,3,3
%N A343945 a(1) = 1; for n >= 2, a(n) = floor(log(sigma(n)) / log(tau(n))).
%C A343945 See A051281 for numbers m such that sigma(m) = tau(m)^k where k = integer, i.e., numbers m such that floor(log(sigma(m)) / log(tau(m))) = log(sigma(m)) / log(tau(m)).
%e A343945 a(6) = floor(log(sigma(6)) / log(tau(6))) = floor(log(12) / log(4)) = floor(1.792481...) = 1.
%e A343945 a(7) = floor(log(sigma(7)) / log(tau(7))) = floor(log(8) / log(2)) = floor(3) = 3.
%t A343945 a[1] = 1; a[n_] := Floor[Log @@ DivisorSigma[{0, 1}, n]]; Array[a, 100] (* _Amiram Eldar_, Dec 16 2021 *)
%o A343945 (Magma) [1] cat [Floor(Log(&+Divisors(n)) / Log(#Divisors(n))): n in [2..100]]
%Y A343945 Cf. A000005(tau), A000203(sigma), A051281, A334455, A349006, A349007.
%K A343945 nonn
%O A343945 1,3
%A A343945 _Jaroslav Krizek_, Dec 16 2021