|
| |
|
|
A090114
|
|
a(n)=Product[p(n)-j, j=1..n].
|
|
1
| |
|
|
1, 2, 24, 360, 30240, 665280, 57657600, 1764322560, 180503769600, 47621141568000, 2180547008640000, 599555620984320000, 74931129164795904000, 4608264443634948096000, 669187660275478536192000
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
EXAMPLE
| n=5: p(5)=11, a(5)=(11-1)()(11-2)(11-3)(11-4)(11-5)=10.9.8.7.6=30240
|
|
|
MATHEMATICA
| Table[Apply[Times, Table[Prime[w]-j, {j, 1, w}]], {w, 1, 15}]
|
|
|
CROSSREFS
| Sequence in context: A119702 A126804 A170913 * A188953 A081685 A052670
Adjacent sequences: A090111 A090112 A090113 * A090115 A090116 A090117
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Labos E. (labos(AT)ana.sote.hu), Jan 08 2004
|
| |
|
|
