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.

A193322 Sum of even divisors of lambda(n).

This page as a plain text file.
%I A193322 #16 Dec 05 2017 04:08:32
%S A193322 0,0,2,2,6,2,8,2,8,6,12,2,24,8,6,6,30,8,26,6,8,12,24,2,36,24,26,8,48,
%T A193322 6,48,14,12,30,24,8,78,26,24,6,84,8,64,12,24,24,48,6,64,36,30,24,84,
%U A193322 26,36,8,26,48,60,6,144,48,8,30,24,12,96,30,24,24,96,8,182,78,36,26,48,24,112,6,80,84,84,8,30,64
%N A193322 Sum of even divisors of lambda(n).
%C A193322 Lambda is the function in A002322.
%H A193322 Antti Karttunen, <a href="/A193322/b193322.txt">Table of n, a(n) for n = 1..16384</a>
%F A193322 a(n) = A146076(A002322(n)). - _Michel Marcus_, Mar 18 2016
%e A193322 a(17) = 30 because lambda(17) = 16 and the sum of the 4 even divisors { 2, 4, 8, 16} is 30.
%t A193322 Table[Total[Select[Divisors[CarmichaelLambda[n]], EvenQ[ # ]&]], {n, 62}]
%t A193322 (* Second program: *)
%t A193322 Array[DivisorSum[CarmichaelLambda@ #, # &, EvenQ] &, 86] (* _Michael De Vlieger_, Dec 04 2017 *)
%o A193322 (PARI) a(n) = sumdiv(lcm(znstar(n)[2]), d, d*(1-(d%2))); \\ _Michel Marcus_, Mar 18 2016
%Y A193322 Cf. A002322, A146076, A191613.
%K A193322 nonn
%O A193322 1,3
%A A193322 _Michel Lagneau_, Jul 22 2011
%E A193322 More terms from _Antti Karttunen_, Dec 04 2017