- /
-
Prime barcode
on 24 Oct 2021
- 8
- 28
- 0
- 0
- 148
p = primes(1000);
n = numel(p);
c = spring(numel(p));
figure('Color','k');
for i = 1:n
line([p(i) p(i)],[0, 1],'Col',c(i,:));
end
axis off
daspect([1.5*n, 1, 1])