A245098 The np values for distinct terms of A246783.
1, 5, 11, 11, 16, 14, 20, 23, 21, 22, 31, 25
Offset: 1
Examples
a(2)=5 because the second distinct term of A246783 is 67 and np(67)=5.
Crossrefs
Cf. A246783
This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
a(2)=5 because the second distinct term of A246783 is 67 and np(67)=5.
a(6)=5 because A246783(6)=67 and np(67)=5.
a(6) = 55 since the number of primes p such that prime(55) < p < prime(55)^(1 + 1/55) is 6 and 55 is the smallest number with this property.
np[n_]:=(b=Prime[n]; Length[Select[Range[b+1, b^(1 + 1/n)],PrimeQ]]); a[n_]:=(For[m=1, np[m] !=n, m++]; m);
Do[Print[a[n]], {n, 37}]
Comments