Sequence of primes by trial division: Difference between revisions

Content added Content deleted
(Added Quackery.)
Line 2,029: Line 2,029:
<pre>>>> primes_below(100)
<pre>>>> primes_below(100)
[2, 3, 5, 7, 11, 13, 17, 19, 23, 29, 31, 37, 41, 43, 47, 53, 59, 61, 67, 71, 73, 79, 83, 89, 97]</pre>
[2, 3, 5, 7, 11, 13, 17, 19, 23, 29, 31, 37, 41, 43, 47, 53, 59, 61, 67, 71, 73, 79, 83, 89, 97]</pre>

=={{header|Quackery}}==

Using word <code>isprime</code> from [[Primality by trial division#Quackery]].

Make a nest of primes less than n.

<lang Quackery>[ [] swap times
[ i^ isprime if
[ i^ join ] ] ] is primes< ( n --> [ )

100 primes< echo</lang>

{{Out}}

<pre>[ 2 3 5 7 11 13 17 19 23 29 31 37 41 43 47 53 59 61 67 71 73 79 83 89 97 ]</pre>


=={{header|Racket}}==
=={{header|Racket}}==