Apéry's constant: Difference between revisions
Content added Content deleted
m (→{{header|Phix}}: (or replace)) |
(J (enough said...)) |
||
Line 41: | Line 41: | ||
;* [[oeis:A002117|OEIS:A002117 - Decimal expansion of zeta(3)]] |
;* [[oeis:A002117|OEIS:A002117 - Decimal expansion of zeta(3)]] |
||
=={{header|J}}== |
|||
<syntaxhighlight lang=J>app3=: {{ +/_3x^~1+i.y }} |
|||
app3m=: {{ _5r2 * +/ {{ (_1^y)*(2^~!y)%(!2*y)*y^3}} 1x+i.y }} |
|||
app3sm=: {{ 1r24* +/ {{ |
|||
(_1^y)*(3^~*/!y,0 1+/2*y)*(12463 104000 336367 531578 412708 126392 p. y)%(!2 3 p.y)*(!3 4 p.y)^3 |
|||
}} x:i.y |
|||
}} |
|||
0j100 ": app3 1000 |
|||
1.2020564036593442854830714115115999903483212709031775135036540966118572571921400836130084123260473112 |
|||
0j100 ": app3m 158 |
|||
1.2020569031595942853997381615114499907649862923404988817922715553418382057863130901864558736093352581 |
|||
0j100 ": app3sm 20 |
|||
1.2020569031595942853997381615114499907649862923404988817922715553418382057863130901864558736093352581 |
|||
</syntaxhighlight> |
|||
=={{header|Phix}}== |
=={{header|Phix}}== |