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.

A363857 Number of divisors of 7*n-5 of form 7*k+6.

This page as a plain text file.
%I A363857 #15 Jun 25 2023 10:42:28
%S A363857 0,0,0,0,1,0,0,0,0,1,1,0,0,0,1,0,1,0,0,1,0,0,2,0,1,0,0,0,1,1,0,0,0,0,
%T A363857 3,1,0,0,0,1,1,0,0,0,1,0,2,0,1,1,0,0,1,0,2,0,0,0,2,1,0,1,0,0,2,0,0,0,
%U A363857 0,1,2,0,0,1,3,0,1,0,0,1,0,0,2,0,1,0,0,1,1,1,0,0,1,0,4,0,0,0,0,1
%N A363857 Number of divisors of 7*n-5 of form 7*k+6.
%C A363857 Also number of divisors of 7*n-5 of form 7*k+5.
%F A363857 a(n) = A363807(7*n-5) = A363808(7*n-5).
%F A363857 G.f.: Sum_{k>0} x^(5*k)/(1 - x^(7*k-1)).
%F A363857 G.f.: Sum_{k>0} x^(6*k-1)/(1 - x^(7*k-2)).
%t A363857 a[n_] := DivisorSum[7*n - 5, 1 &, Mod[#, 7] == 6 &]; Array[a, 100] (* _Amiram Eldar_, Jun 25 2023 *)
%o A363857 (PARI) a(n) = sumdiv(7*n-5, d, d%7==6);
%Y A363857 Cf. A361691, A363854, A363855, A363856, A363858.
%Y A363857 Cf. A363807, A363808.
%K A363857 nonn
%O A363857 1,23
%A A363857 _Seiichi Manyama_, Jun 24 2023