Wolstenholme numbers: Difference between revisions

J draft
m (→‎{{header|Python}}: simplify output functions)
(J draft)
Line 24:
;* [[oeis:A123751|OEIS:A123751 - Prime Wolstenholme numbers]]
 
 
=={{header|J}}==
<syntaxhighlight lang=J>NB. the first y members of the Wholstenhome sequence
WolstenholmeSeq=: {{ 2 {."1@x:+/\%*:1x+i.y }}
 
WolstenholmeSeq 20
1 5 49 205 5269 5369 266681 1077749 9778141 1968329 239437889 240505109 40799043101 40931552621 205234915681 822968714749 238357395880861 238820721143261 86364397717734821 17299975731542641
(#~ 1 p: ])WolstenholmeSeq 20
5 266681 40799043101 86364397717734821
</syntaxhighlight>
 
=={{header|Python}}==
6,962

edits