Search: id:A124316 Results 1-1 of 1 results found. %I A124316 %S A124316 1,2,2,5,2,4,2,8,6,4,2,10,2,4,4,15,2,12,2,10,4,4,2,16,8,4,10,10,2,8,2, %T A124316 22,4,4,4,30,2,4,4,16,2,8,2,10,12,4,2,30,10,16,4,10,2,20,4,16,4,4,2,20, %U A124316 2,4,12,37,4,8,2,10,4,8,2,48,2,4,16,10,4,8,2,30,23,4,2,20,4,4,4,16,2,24 %N A124316 a(n) = Sum_{ d divides n } sigma_1(lcm(d,n/d)), where sigma is the sum of divisors function. %t A124316 Table[Plus @@ Map[DivisorSigma[1, GCD[ #, n/# ]] &, Divisors@n], {n, 90}] %Y A124316 Cf. A001616, A061884, A124315. %Y A124316 Sequence in context: A021448 A108053 A133501 this_sequence A061034 A111861 A004543 %Y A124316 Adjacent sequences: A124313 A124314 A124315 this_sequence A124317 A124318 A124319 %K A124316 nonn %O A124316 1,2 %A A124316 Robert G. Wilson v (rgwv(AT)rgwv.com), Sep 30 2006 Search completed in 0.001 seconds