|
|
A363457
|
|
Positions of products of distinct primorial numbers (A129912) in the sequence of products of primorial numbers (A025487).
|
|
2
|
|
|
1, 2, 4, 6, 9, 13, 20, 22, 27, 29, 43, 54, 55, 66, 72, 89, 93, 112, 114, 123, 140, 147, 150, 175, 186, 223, 232, 242, 246, 274, 279, 285, 290, 332, 371, 376, 425, 433, 439, 442, 488, 500, 518, 535, 539, 570, 619, 624, 656, 718, 747, 761, 783, 789, 816, 831, 860
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
What is the asymptotic behavior of this sequence? Empirically, it seems that a(n) ~ A * n^c, where A and c are constants.
|
|
LINKS
|
|
|
FORMULA
|
|
|
MATHEMATICA
|
lps = Cases[Import["https://oeis.org/A025487/b025487.txt", "Table"], {_, _}][[;; , 2]];
prod = Cases[Import["https://oeis.org/A129912/b129912.txt", "Table"], {_, _}][[;; , 2]];
Position[lps, #] & /@ prod // Flatten
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|