login
a(n) = floor( prime(n)^3 / (n*log(n)) ).
0

%I #38 Sep 08 2022 08:46:13

%S 19,37,61,165,204,360,412,615,1059,1129,1698,2066,2151,2555,3356,4264,

%T 4362,5376,5973,6084,7250,7928,9242,11341,12162,12279,13129,13261,

%U 14141,19242,20270,22285,22399,26583,26688,28965,31330,32597,35090,37668,37773,43082

%N a(n) = floor( prime(n)^3 / (n*log(n)) ).

%F a(n) = floor( A030078(n) / (n*log(n))).

%t Table[Floor[Prime[n]^3/(n Log[n])], {n, 2, 30}]

%o (PARI) a(n) = floor(prime(n)^3/(n*log(n))); \\ _Michel Marcus_, Jul 02 2015

%o (Magma) [Floor((NthPrime(n))^3/(n*Log(n))): n in [2..60]]; // _Vincenzo Librandi_, Jul 03 2015

%Y Cf. A024702, A011757, A138672.

%K nonn

%O 2,1

%A _Ilya Gutkovskiy_, Jul 02 2015