[go: up one dir, main page]

login
A085089
Number of distinct prime signatures arising up to n.
13
1, 2, 2, 3, 3, 4, 4, 5, 5, 5, 5, 6, 6, 6, 6, 7, 7, 7, 7, 7, 7, 7, 7, 8, 8, 8, 8, 8, 8, 9, 9, 10, 10, 10, 10, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 12, 12, 12, 12, 12, 12, 12, 12, 12, 12, 12, 12, 13, 13, 13, 13, 14, 14, 14, 14, 14, 14, 14, 14, 15, 15, 15, 15, 15, 15, 15, 15, 15
OFFSET
1,2
LINKS
PROG
(PARI) A085089(n)=#Set(apply(t->vecsort(factor(t)[, 2]), [1..n])) \\ Not very efficient for large n > 10^5, but very quick up to the point where stack overflow occurs. - M. F. Hasler, Jul 16 2019
CROSSREFS
Cf. A025487.
Cf. A025488(n) = a(2^n); A124832 (table of the distinct prime signatures in the order they occur).
Sequence in context: A282711 A035100 A303594 * A228720 A219652 A069924
KEYWORD
easy,nonn
AUTHOR
Amarnath Murthy and Meenakshi Srikanth (menakan_s(AT)yahoo.com), Jul 02 2003
EXTENSIONS
More terms from Ray Chandler, Aug 17 2003
STATUS
approved