Rosetta Code

Smarandache prime-digital sequence: Difference between revisions

Page Discussion

Smarandache prime-digital sequence (view source)

Revision as of 17:04, 31 May 2019

17 bytes removed ,  5 years ago
m
→‎{{header|zkl}}: crunch
(→‎{{header|zkl}}: added code)
Line 237:
[[Extensible prime generator#zkl]] could be used instead.
<lang zkl>var [const] BI=Import("zklBigNum"); // libGMP
var [const] primeBitMap=Data(100_000).fill(0);
 
spds:=Walker.zero().tweak(fcn(ps){
var [const] nps=T(0,0,1,1,0,1,0,1,0,0); // 2,3,5,7
primeBitMap[ p:=ps.nextPrime().toInt() ]=1;
if(p.split().filter( fcn(n){ 0==primeBitMapnps[n] }) ) return(Void.Skip);
p // 733 --> (7,3,3) --> () --> good, 29 --> (2,9) --> (9) --> bad
}.fp(BI(1)));</lang>
Anonymous user
Retrieved from "https://rosettacode.org/wiki/Special:MobileDiff/290772"