|
Search: id:A088304
|
|
|
| A088304 |
|
a(1) = 1. For n > 1, a(n) = a(n-1) if n is prime, a(n) = a(n-1)/n if n is composite and divides a(n-1) else a(n) = n*a(n-1). |
|
+0
1
|
|
| 1, 1, 1, 4, 4, 24, 24, 3, 27, 270, 270, 3240, 3240, 45360, 3024, 189, 189, 3402, 3402, 68040, 3240, 71280, 71280, 2970, 74250, 1930500, 71500, 2002000, 2002000, 60060000, 60060000, 1876875, 56875, 1933750, 55250, 1989000, 1989000, 75582000
(list; graph; listen)
|
|
|
OFFSET
|
1,4
|
|
|
PROGRAM
|
(PARI) b=1; for(n=2, 39, if(isprime(n), a=b, if(b%n==0, a=b/n, a=n*b)); print1(b, ", "); b=a)
|
|
CROSSREFS
|
Sequence in context: A014433 A072696 A075219 this_sequence A131978 A049614 A058166
Adjacent sequences: A088301 A088302 A088303 this_sequence A088305 A088306 A088307
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Amarnath Murthy (amarnath_murthy(AT)yahoo.com), Oct 01 2003
|
|
EXTENSIONS
|
Extended by Klaus Brockhaus (klaus-brockhaus(AT)t-online.de) and Ray Chandler (rayjchandler(AT)sbcglobal.net), Oct 06 2003
|
|
|
Search completed in 0.002 seconds
|
