Skip to content

clj-commons/humanize

Repository files navigation

org.clj-commons/humanize

Clojars Project clojure.yml cljdoc badge

A Clojure(script) library to produce human-readable strings for numbers, dates, and more based on similar libraries in other languages

Usage

numberword

Takes a number and return a full written string form. For example, 23237897 will be written as "twenty-three million two hundred and thirty-seven thousand eight hundred and ninety-seven".

user> (require '[clj-commons.humanize :as h])
nil

user> (h/numberword 3567)
"three thousand five hundred and sixty-seven"

user> (h/numberword 25223)
"twenty-five thousand two hundred and twenty-three"

user> (h/numberword 23237897)
"twenty-three million two hundred and thirty-seven thousand eight hundred and ninety-seven"

intcomma

Converts an integer to a string containing commas every three digits.

user>  (h/intcomma 1000)
"1,000"

user>  (h/intcomma 10123)
"10,123"

user>  (h/intcomma 10311)
"10,311"

user>  (h/intcomma 1000000)
"1,000,000"

intword

Converts a large integer to a friendly text representation. Works best for numbers over 1 million. For example, 1000000 becomes '1.0 million', 1200000 becomes '1.2 million' and '1200000000' becomes '1.2 billion'. Supports up to decillion (33 digits) and googol (100 digits).

user>  (h/intword 2000000000)
"2.0 billion"

user>  (h/intword 6000000000000)
"6.0 trillion"

user>  (h/intword 3500000000000000000000N)
"3.5 sextillion"

user>  (h/intword 8100000000000000000000000000000000N)
"8.1 decillion"

ordinal

Converts an integer to its ordinal as a string.

user> (h/ordinal 1)
"1st"

user>  (h/ordinal 2)
"2nd"

user>  (h/ordinal 4)
"4th"

user>  (h/ordinal 11)
"11th"

user>  (h/ordinal 111)
"111th"

filesize

Format a number of bytes as a human-readable filesize (eg. 10 kB). By default, decimal suffixes (kB, MB) are used. Passing the :binary option as true will use binary suffixes (KiB, MiB) are used.

The :format option gives more control over how the numeric part of the output filesize is created.

user>  (h/filesize 3000000 :binary false)
"3.0MB"

user>  (h/filesize 3000000000000 :binary false)
"3.0TB"

user>  (h/filesize 3000 :binary true :format "%.2f")
"2.93KiB"

user>  (h/filesize 3000000 :binary true)
"2.9MiB"

truncate

Truncate a string with suffix (ellipsis by default) if it is longer than specified length.

user> (h/truncate "abcdefghijklmnopqrstuvwxyz" 10)
"abcdefg..."

user> (h/truncate "abcdefghijklmnopqrstuvwxyz" 10 "[more]")
"abcd[more]"

oxford

Converts a list of items to a human-readable string with an optional limit.

user> (h/oxford ["apple" "orange" "mango"])
"apple, orange, and mango"

user> (h/oxford ["apple" "orange" "mango" "pear"]
                                       :maximum-display 2)
"apple, orange, and 2 others"

user> (h/oxford ["apple" "orange" "mango" "pear"]
                                       :maximum-display 2
                                       :truncate-noun "fruit")
"apple, orange, and 2 other fruits"

user> (h/oxford ["apple" "orange" "mango" "pear"]
        :maximum-display 2
        :number-format h/numberword
        :truncate-noun "fruit")
"apple, orange, and two other fruits"

pluralize-noun

Return the pluralized noun if the given number is not 1.

user (require '[clj-commons.humanize.inflect :as i])
nil

user> (i/pluralize-noun 2 "thief")
"thieves"

user> (i/pluralize-noun 3 "tomato")
"tomatoes"

user> (i/pluralize-noun 4 "roof")
"roofs"

user> (i/pluralize-noun 5 "person")
"people"

user> (i/pluralize-noun 6 "buzz")
"buzzes"

Other functions in the inflect namespace are used to extend the rules for how particular words, or particular letter patterns in words, can be pluralized.

datetime

Given a datetime or date, return a human-friendly representation of the amount of time difference, relative to the current time.

user> (import '(java.time LocalDateTime) '(java.time.temporal ChronoUnit))
java.time.temporal.ChronoUnit

user> (h/datetime (.plusSeconds (LocalDateTime/now) -30))
"30 seconds ago"

user> (h/datetime (.plusSeconds (LocalDateTime/now) 30))
"in 30 seconds"

user> (h/datetime (.plus (LocalDateTime/now) -20 ChronoUnit/YEARS))
"2 decades ago"

user> (h/datetime (.plus (LocalDateTime/now) -7 ChronoUnit/YEARS))
"7 years ago"

duration

Given a duration in milliseconds, return a human-friendly representation of the amount of time passed.

user> (h/duration 2000)
"two seconds"

user> (h/duration 325100)
"five minutes, twenty-five seconds"

user> (h/duration 500)
"less than a second"

user> (h/duration 325100 {:number-format str})
=> "5 minutes, 25 seconds"

Linting

Run:

 clj -M:clj-kondo --lint src

Running Tests

JVM tests can be run with just:

clojure -X:test

For cljs, you will need node/npm in order to install karma:

npm install -g karma karma-cljs-test karma-chrome-launcher karma-firefox-launcher

Then tests can be run with:

clojure -M:cljs-test -x chrome-headless

Or -x firefox-headless.

Deployment

Check deps-deploy README for details regarding clojars credentials.

Build a snapshot jar:

clojure -T:build jar

Deploy a snapshot:

 clojure -T:build deploy

Set :release to true for a release version (make sure the version number in build.clj is correct first):

clojure -T:build deploy :release true

TODO

  • Add other missing functions

License

Copyright 2015-2023 Thura Hlaing

Distributed under the Eclipse Public License either version 1.0 or (at your option) any later version.

About

Produce human readable strings in clojure

Resources

License

Stars

Watchers

Forks

Packages

No packages published