syou6162

handbrake_path = "/Volumes/HandBrake-0.9.8-MacOSX.6_CLI_x86_64/HandBrakeCLI"
preset = "--preset=\"iPhone & iPod Touch\""
native_language = "--native-language eng"
subtitle = "--subtitle 2 --subtitle-burn 2"
input_base_dir = "/Users/yasuhisa/Desktop"
output_base_dir = "/Users/yasuhisa/Desktop"
cdr_id = 1

(1..4).each {|chapter|
  opts = ["-i", "#{input_base_dir}/FRIENDS_1_#{cdr_id}.cdr",

syou6162

(defmacro memoize-fn [name args body]
  `(let [mem# (atom {})]
     (fn ~args
       (if-let [e# (find @mem# ~args)]
         (val e#)
         (let [ret# ~body]
           (swap! mem# assoc ~args ret#)
           ret#)))))

(->> (range 35)

syou6162

test

syou6162

syou6162

メモリ

• tnoda-clojure • Crunching Numbers with Clojure - 11 Tips to Boost Your Performance
• clojurewest2012-slides/Solano-Gómez-Crunching-Numbers-with-Clojure.pdf at master · strangeloop/clojurewest2012-slides · GitHub

個人的にはコレクションと配列との使用メモリ量比較が参考になりました．1M 個の long を格納するとして，vector だと 30MB, vector-of だと 9MB, 配列だと 8MB というのは覚えておいて損は無さそうです．案外 vector はメモリを食いません．

メモリ消費量を測定する用のマクロ

(defn current-total-memory-usage []

syou6162

test

syou6162

#_(defdeps
    [[org.clojure/clojure "1.5.1"]
     [info.yasuhisay/clj-utils "0.1.1"]
     [org.clojure/tools.cli "0.2.1"]])

(ns info.yasuhisay.dep-util
  (:use [clojure.string :only (split)])
  (:use [clj-utils.random :only (shuffle-with-random)])
  (:require [clojure.tools.cli :as cli]))

syou6162

(import edu.stanford.nlp.trees.PennTreeReader)

(let [filename "/Users/yasuhisa/Desktop/PENN_TREEBANK3/PARSED/MRG/WSJ/00/WSJ_0001.MRG"]
  (with-open [rdr (clojure.java.io/reader filename)]
    (let [ptr (new PennTreeReader rdr)
          trees (loop [result []]
                  (if-let [t (.readTree ptr)]
                    (recur (conj result t))
                    result))]
      (for [^LabeledScoredTreeNode t trees]

syou6162

;; Clojureでのhashcodeの例

(hash "hoge") ; 3208229
;; clojureのvectorはよい
(hash [1 2 3]) ; 30817
;; javaの配列は毎回hashcodeが変わってしまうので注意
(hash (int-array [1 2 3])) ; 1628598432
(hash (int-array [1 2 3])) ; 1172445666

;; feature hashingの例

syou6162

• git - 作業中のブランチとは別のリモートブランチにとりあえず作業状態を保存しておく。 - Qiita
• とあるエンジニアの備忘log: patch コマンド

git clone [email protected]:syou6162/hoge.git
git add ...
git ci "Save WIP"
git push origin HEAD:WIP-foo
git branch WIP-foo origin/WIP-foo # remoteにしかないからlocalにブランチを作る
git diff --no-prefix develop WIP-foo > p