Bioinformatics/base count: Difference between revisions
m
→{{header|Phix}}: bugfix (join_by has been tweaked)
(Added Wren) |
m (→{{header|Phix}}: bugfix (join_by has been tweaked)) |
||
Line 578:
end for
acgt[$] = sum(acgt)
sequence s = split(trim(join_by(split(join_by(dna,1,10,""),"\n"),1,5," ")),"
for i=1 to length(s) do
printf(1,"%3d: %s\n",{(i-1)*50+1,s[i]})
| |||