   (jq/remove ($ :#search_table))
   (jq/remove ($ :#table_stats))
   (jq/after (jq/find parent :h2)
-            (view/table-stats (str "Tag Type Counts: " (frequencies-string (map first tags)))
-                              (str "Tag Counts: " (frequencies-string (flatten (map :tags things))))
-                              (str "Type Counts: " (frequencies-string (map :type things)))))
+            (view/table-stats (frequency-stat "Tag Type Counts" (map first tags))
+                              (frequency-stat "Tag Counts" (flatten (map :tags things)))
+                              (frequency-stat "Type Counts" (map :type things))))
   (jq/after (jq/find parent :#table_stats)
             (generate-table "search_table" things
                             :fields [:type :name :url :desc :tags]

        (make-table-editable)
        (.timeago ($ :td.timestamp))
        (jq/prepend ($ :#type_show_box)
                    (view/table-stats (str "Tag Counts: " (frequencies-string (flatten (map :tags data)))))))
      :data {:name type})))

(defn ^:export all []

                             :type "POST"
                             :data {:id id})))))

(defn- frequency-stat [title data]
  (format "%s: %s - %s" title (count data) (frequencies-string data)))

(defn frequencies-string [items]
  (->> items
       frequencies
