|
| |
|
|
A080696
|
|
Piptorial primes = product of pips or prime-index-primes.
|
|
2
| |
|
|
3, 15, 165, 2805, 86955, 3565155, 210344145, 14093057715, 1169723790345, 127499893147605, 16192486429745835, 2542220369470096095, 455057446135147201005, 86915972211813115391955
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,1
|
|
|
COMMENTS
| The numbers after the first always end in 5. This is obvious since all pips are odd and their product (excluding 5) = 2k+1 and 5*(2k+1) = 10k+5. Sum of reciprocals converges to 0.4064288978193657814428353009..
|
|
|
FORMULA
| prime(prime(1)), prime(prime(1))*prime(prime(2)), ...
|
|
|
EXAMPLE
| pip(1) = 3,pip(2)=5,pip(3)=11 piptorial(3) = 3*5*11 = 165
|
|
|
MATHEMATICA
| nn=50; FoldList[Times, 1, Transpose[Select[Thread[{Prime[Range[nn]], Range[nn]}], PrimeQ[ Last[#]]&]][[1]]] (* From Harvey P. Dale, July 05 2011 *)
|
|
|
PROG
| (PARI) piptorial(n) = {sr=0; pr=1; for(x=1, n, y=prime(prime(x)); pr*=y; print1(pr" "); sr+=1.0/pr; ); print(); print(sr) }
|
|
|
CROSSREFS
| Sequence in context: A105611 A108975 A097489 * A015013 A153280 A132683
Adjacent sequences: A080693 A080694 A080695 * A080697 A080698 A080699
|
|
|
KEYWORD
| easy,nonn
|
|
|
AUTHOR
| Cino Hilliard (hillcino368(AT)gmail.com), Mar 04 2003
|
| |
|
|
