login
Integer part of the diameters of circles with prime circumferences.
0

%I #6 Oct 01 2013 17:58:02

%S 0,0,1,2,3,4,5,6,7,9,9,11,13,13,14,16,18,19,21,22,23,25,26,28,30,32,

%T 32,34,34,35,40,41,43,44,47,48,49,51,53,55,56,57,60,61,62,63,67,70,72,

%U 72,74,76,76,79,81,83,85,86,88,89,90,93,97,98,99,100,105,107,110,111,112

%N Integer part of the diameters of circles with prime circumferences.

%F Diameter = Circumference/Pi.

%e If C = 5. floor(3/Pi) = 1, the third entry.

%t Floor[#/Pi]&/@Prime[Range[80]] (* _Harvey P. Dale_, Dec 28 2012 *)

%o (PARI) f(n) = forprime(x=1,n,print1(floor(x/Pi)","))

%K nonn

%O 2,4

%A _Cino Hilliard_, Aug 22 2004