因为vector字面量具有self-quoting效果
(equal '[3 a] [3 a]) ;; => t
(equal [a b c] (vector 'a 'b 'c)) ;; => t
;; 不能用`eq'，因为eq比较两个symbol的内存地址是否一致。
[f1]里面装的也不是字符串，是symbol。要把string转化为symbol可以用intern string都会有双引号包裹的
(equal [f1] (vector (intern "f1"))) ;; => t