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.

A280258 a(n) = Sum_{d|n} pxi(d), where pxi(m) is the product of totatives of m (A001783).

This page as a plain text file.
%I A280258 #19 Aug 02 2025 14:30:26
%S A280258 1,2,3,5,25,9,721,110,2243,215,3628801,397,479001601,20027,896923,
%T A280258 2027135,20922789888001,87334,6402373705728001,8729939,47297536723,
%U A280258 1253566127,1124000727777607680001,37182647,41363226782215962649,608621584727,1524503639859202243
%N A280258 a(n) = Sum_{d|n} pxi(d), where pxi(m) is the product of totatives of m (A001783).
%C A280258 Conjecture: a(n) is odd for numbers in A183300; a(n) is even for numbers in A001105 (2*n^2).
%C A280258 Numbers n such that a(n) is prime: 2, 3, 4, 9, 12, 20, 27, ... (there are no other terms < 742). Corresponding values of primes: 2, 3, 5, 2243, 397, 8729939, 1524503639859202243, ...
%H A280258 Robert G. Wilson v, <a href="/A280258/b280258.txt">Table of n, a(n) for n = 1..1000</a>
%F A280258 a(n) = Sum_{d|n} A001783(d).
%e A280258 For n=6; sets of totatives of divisors of 6: {1}, {1}, {1, 2}, {1, 5}; a(6) = 1+1+(1*2)+(1*5) = 9.
%t A280258 Table[Sum[Times @@ Select[Range@ d, CoprimeQ[#, d] &], {d, Divisors@ n}], {n, 27}] (* _Michael De Vlieger_, Jan 01 2017 *)
%o A280258 (Magma) [&+[&*[h: h in [1..d] | GCD(h,d) eq 1]: d in Divisors(n)]: n in [1..100]];
%o A280258 (PARI) a(n) = sumdiv(n, d, prod(k=1, d, if (gcd(k,d)==1, k, 1))); \\ _Michel Marcus_, Jan 02 2017
%Y A280258 Cf. A001783, A001105, A183300, A280259, A280260.
%K A280258 nonn
%O A280258 1,2
%A A280258 _Jaroslav Krizek_, Jan 01 2017