OFFSET
1,1
COMMENTS
The asymptotic density of this sequence is 192/17017. - Amiram Eldar, Dec 06 2020
REFERENCES
Emmanuel Desurvire, Classical and Quantum Information Theory: An Introduction for the Telecom Scientist, Cambridge University Press, 2009, table 20.5 p. 421.
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..10000
FORMULA
a(n) = 17*A008366(n).
EXAMPLE
a(2) = 17*17, a(3) = 17*19.
MATHEMATICA
17 * Select[Range[230], CoprimeQ[#, 30030] &] (* Amiram Eldar, Feb 24 2020 *)
PROG
(Rexx)
P = 17 ; S = P
do N = P by 2 while length( S ) < 255
do I = 1 until P = X
X = PRIME( I )
if P = X then leave I
if N // X = 0 then iterate N
end I
S = S || ', ' P*N
end N
say S ; return S
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Frank Ellermann, Feb 24 2020
STATUS
approved