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.

A013941 a(n) = Sum_{k = 1..n} floor(n/prime(k)^3).

This page as a plain text file.
%I A013941 #23 Jun 26 2022 22:45:58
%S A013941 0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,2,2,2,2,2,2,2,2,3,3,3,4,4,4,4,4,5,5,5,
%T A013941 5,5,5,5,5,6,6,6,6,6,6,6,6,7,7,7,7,7,7,8,8,9,9,9,9,9,9,9,9,10,10,10,
%U A013941 10,10,10,10,10,11,11,11,11
%N A013941 a(n) = Sum_{k = 1..n} floor(n/prime(k)^3).
%F A013941 G.f.: (1/(1 - x))*Sum_{k>=1} x^(prime(k)^3)/(1 - x^(prime(k)^3)). - _Ilya Gutkovskiy_, Feb 11 2017
%p A013941 A013941:=n->add(floor(n/ithprime(k)^3), k=1..n): seq(A013941(n), n=1..150); # _Wesley Ivan Hurt_, Jan 29 2017
%t A013941 Table[Floor[Sum[n/Prime[k]^3, {k, n}]], {n, 75}] (* _Alonso del Arte_, Jan 29 2017 *)
%o A013941 (PARI) a(n) = sum(k = 1, n, n\prime(k)^3); \\ _Michel Marcus_, Aug 24 2013
%Y A013941 Cf. A013940.
%Y A013941 Partial sums of A295659.
%K A013941 nonn,easy
%O A013941 1,16
%A A013941 _N. J. A. Sloane_, _Henri Lifchitz_