A250621 a(n) = floor(n*log(prime(n))).
0, 2, 4, 7, 11, 15, 19, 23, 28, 33, 37, 43, 48, 52, 57, 63, 69, 73, 79, 85, 90, 96, 101, 107, 114, 119, 125, 130, 136, 141, 150, 156, 162, 167, 175, 180, 187, 193, 199, 206, 212, 218, 225, 231, 237, 243, 251, 259, 265, 271, 278, 284, 290, 298, 305, 312, 318, 324, 331
Offset: 1
Examples
For n = 1, prime(1) = 2, floor(1*0.69... = 0.69...) = 0 ; For n = 25, prime(25) = 97, floor(25*4.57... = 114.36...) = 114.
Crossrefs
Programs
-
Mathematica
Table[Floor[n Log[Prime[n]]],{n,60}] (* Harvey P. Dale, Aug 13 2019 *)
-
PARI
vector(100,n,floor(n*log(prime(n)))) \\ Derek Orr, Nov 28 2014
Comments