|
Search: id:A073699
|
|
|
| A073699 |
|
Floor[ (Product of composite numbers up to n)/(product of primes up to n)]. |
|
+0
1
|
|
| 1, 0, 0, 0, 0, 0, 0, 0, 8, 82, 7, 89, 6, 96, 1450, 23201, 1364, 24565, 1292, 25858, 543035, 11946780, 519425, 12466205, 311655142, 8103033711, 218781910200, 6125893485615, 211237706400, 6337131192016, 204423586839, 6541554778855
(list; graph; listen)
|
|
|
OFFSET
|
1,9
|
|
|
COMMENT
|
Note 1 is neither prime nor composite.
|
|
EXAMPLE
|
a(10) = Floor[ {4*6*8*9*10}/{2*3*5*7)] =82.
|
|
MAPLE
|
a := 1:b := 1:for i from 2 to 100 do if isprime(i) then a := a*i: else b := b*i:fi: c[i] := floor(b/a):od:c[1] := 1:seq(c[j], j=1..100);
|
|
CROSSREFS
|
Sequence in context: A104126 A100879 A080811 this_sequence A068173 A069635 A069620
Adjacent sequences: A073696 A073697 A073698 this_sequence A073700 A073701 A073702
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Amarnath Murthy (amarnath_murthy(AT)yahoo.com), Aug 12 2002
|
|
EXTENSIONS
|
More terms from Sascha Kurz (sascha.kurz(AT)uni-bayreuth.de), Aug 15 2002
|
|
|
Search completed in 0.002 seconds
|
