|
%I #15 Feb 10 2015 08:48:53
%S 6,9,15,21,34,40,53,59,72,91,97,116,128,135,147,166,185,191,210,223,
%T 229,248,260,279,304,317,323,336,342,354,398,411,430,436,468,474,493,
%U 512,524,543,562,568,600,606,618,625,662,700,713,719,731,750,757,788,807
%N Integer part of the circumference of circles with prime diameters.
%F Circumference = Pi*D.
%e If D = 11. floor(Pi*11) = 34, the fifth entry.
%p seq(floor(ithprime(i)*Pi), i=1..100); # _Robert Israel_, Feb 09 2015
%t Table[Floor[Pi Prime[n]], {n, 50}] (* _Waldemar Puszkarz_, Feb 09 2015 *)
%o (PARI) f(n) = forprime(x=1,n,print1(floor(Pi*x)","))
%K nonn
%O 1,1
%A _Cino Hilliard_, Aug 22 2004
|
