cognitomさんの投稿にコメントしたやつ。
numberFormat = (n, r)-> (n = "#{n}") and (r = if r? then "#{n[-3..]},#{r}" else n[-3..]) and (n = n[0...-3]) and arguments.callee(n, r) or r
使うときの引数は1個だけで。
追記
もう一個思いついたけどこっちはかなり遅い。
numberFormat = (n)-> (n = "#{n}") and (((v + n[k]) for v,k in ((if w % 3 or w == n.length then "" else ",") for w in [1..n.length]).reverse())).join("")