Anonymous user
Almost prime: Difference between revisions
→{{header|Maxima}}
imported>Maxima enthusiast No edit summary |
imported>Maxima enthusiast |
||
Line 3,137:
/* Function that given a parameter k1 returns the first len k1-almost primes */
k_almost_prime_count(k1,len):=block(
count:
while length(sublist(makelist(i,i,count),lambda([x],k_almost_primep(x,k1))))<len do (count:count+1),
sublist(makelist(i,i,count),lambda([x],k_almost_primep(x,k1))))$
| |||