|
|
A128703
|
|
Numbers of the form 5^k*p, where 1 <= k <= 5 and p is a prime different from 5.
|
|
2
|
|
|
10, 15, 35, 50, 55, 65, 75, 85, 95, 115, 145, 155, 175, 185, 205, 215, 235, 250, 265, 275, 295, 305, 325, 335, 355, 365, 375, 395, 415, 425, 445, 475, 485, 505, 515, 535, 545, 565, 575, 635, 655, 685, 695, 725, 745, 755, 775, 785, 815, 835, 865, 875, 895, 905
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
Auxiliary sequence for A128704 which gives the number of groups of order a(n).
|
|
LINKS
|
|
|
EXAMPLE
|
375 = 5^3*3 is a term.
|
|
MATHEMATICA
|
With[{upto=1000}, Select[Union[Flatten[5^Range[5] #&/@Drop[Prime[ Range[ PrimePi[ Ceiling[upto/5]]]], {3}]]], #<=upto&]] (* Harvey P. Dale, Jul 27 2011 *)
|
|
PROG
|
(Magma) [ n: n in [1..910] | #t eq 2 and ((t[1, 1] lt 5 and t[1, 2] eq 1 and t[2, 1] eq 5 and t[2, 2] le 5) or (t[1, 1] eq 5 and t[1, 2] le 5 and t[2, 2] eq 1)) where t is Factorization(n) ];
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|