login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A127044 Squares of denominators of Sum_{k=1..p-1} 1/k^2} for p in A127042. 5
1, 2, 12, 60, 720720, 12252240, 80313433200, 2329089562800, 144403552893600, 5342931457063200, 718766754945489455304472257065075294400, 52573842877942565273243107104095419458814459401768000 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,2

LINKS

Table of n, a(n) for n=1..12.

MATHEMATICA

a = {}; Do[If[Sqrt[Denominator[Sum[1/x^2, {x, 1, Prime[x] - 1}]]] == Floor[Sqrt[Denominator[Sum[1/x^2, {x, 1, Prime[x] - 1}]]]], AppendTo[a, Sqrt[Denominator[Sum[1/x^2, {x, 1, Prime[x] - 1}]]]]], {x, 1, 50}]; a

CROSSREFS

Cf. A061002, A034602, A127029, A127042, A127043.

Sequence in context: A082688 A099996 A099795 * A245091 A037562 A321277

Adjacent sequences:  A127041 A127042 A127043 * A127045 A127046 A127047

KEYWORD

nonn

AUTHOR

Artur Jasinski, Jan 03 2007

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified April 21 22:12 EDT 2019. Contains 322328 sequences. (Running on oeis4.)