Created
July 10, 2013 15:49
-
-
Save eigenhombre/5967451 to your computer and use it in GitHub Desktop.
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(->> human | |
sequence-headers | |
first | |
((juxt :n-block-starts :n-block-sizes)) | |
(apply interleave) | |
(partition 2) | |
(map vec) | |
clojure.pprint/pprint) | |
;; Gives: | |
([0 10000] | |
[177417 50000] | |
[267719 50000] | |
[471368 50000] | |
[2634220 50000] | |
[3845268 150000] | |
[13052998 50000] | |
[13219912 100000] | |
[13557162 50000] | |
[17125658 50000] | |
[29878082 150000] | |
[103863906 50000] | |
[120697156 50000] | |
[120936695 150000] | |
[121485434 21050000] | |
[142731022 50000] | |
[142967761 150000] | |
[143292816 50000] | |
[143544525 100000] | |
[143771002 100000] | |
[144095783 50000] | |
[144224481 50000] | |
[144401744 50000] | |
[144622413 50000] | |
[144710724 100000] | |
[145833118 50000] | |
[146164650 50000] | |
[146253299 50000] | |
[148026038 150000] | |
[148361358 150000] | |
[148684147 50000] | |
[148954460 50000] | |
[149459645 50000] | |
[205922707 150000] | |
[206332221 150000] | |
[223747846 50000] | |
[235192211 50000] | |
[248908210 150000] | |
[249240621 10000]) |
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment