|
%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
|
