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.

A379379 Sum of odd divisors of n except the "e" odd divisors described in A005279.

This page as a plain text file.
%I A379379 #36 Jan 12 2025 08:47:45
%S A379379 1,1,4,1,6,1,8,1,13,6,12,1,14,8,19,1,18,1,20,1,32,12,24,1,31,14,40,1,
%T A379379 30,1,32,1,48,18,41,1,38,20,56,1,42,1,44,12,49,24,48,1,57,31,72,14,54,
%U A379379 1,72,1,80,30,60,1,62,32,95,1,84,1,68,18,96,41,72,1,74
%N A379379 Sum of odd divisors of n except the "e" odd divisors described in A005279.
%C A379379 Shares infinitely many terms with A000593.
%C A379379 a(n) = A000593(n) if n is not in A005279.
%C A379379 a(n) < A000593(n) if n is in A005279.
%t A379379 a[n_] := Module[{d = Partition[Divisors[n], 2, 1]}, 1 + Total[Select[d, OddQ[#[[2]]] && #[[2]] >= 2*#[[1]] &][[;; , 2]]]]; Array[a, 100] (* _Amiram Eldar_, Dec 22 2024 *)
%Y A379379 Row sums of A379288.
%Y A379379 Cf. A001227, A000593, A005279, A182469, A237270, A237271, A237593, A239657, A379374, A379384, A379461.
%K A379379 nonn
%O A379379 1,3
%A A379379 _Omar E. Pol_, Dec 21 2024
%E A379379 More terms from _Alois P. Heinz_, Dec 22 2024