 (defn team-stats-by-match [match-id team-id]
   (as-> "http://sportsapi.sport1.de/team-stats-by-match/ma%s/te%s" x
         (format x match-id team-id)
-        (to-clj x)))
+        (to-clj x)
+        (first x)))
 
 (defn season-by-competition [saison]
   (let [name (format "20%s/20%s" 

                      (vector home away hg ag)))
             x)))


(defn map-inverse [m]
  (as-> m x
        (map (fn [[k v]] [v k]) x)
        (into {} x)
        )
  )




(defn data [saison spieltag kategorie])


(defn shots-on-goal [saison spieltag]
  (data saison spieltag "torschuesse"))

(defn tore [saison spieltag]
  (data saison spieltag "tore"))

            [paulkrake.score :as s]
            [paulkrake.glicko2 :as g]
            [clojure.data.json :as json]))

(defn to-clj-unmemoized [uri]
  (->> uri slurp json/read-str ))
