   (cond
     (< stat 75) {:name  "actual"
                  :value stat
-                 :color "#509E50"}
+                 :color "#43a047"}
     (> stat 90) {:name  "actual"
                  :value stat
-                 :color "rgb(244, 67, 54)"}
+                 :color "#d32f2f"}
     :else {:name  "actual"
            :value stat
-           :color "#9e931b"}))
+           :color "#ffa000"}))
 
 (rum/defc node-graph [stat label]
   (let [data [(node-used stat)

    (comp/grid
      {:item true}
      (html
        [:a {:href  (str "/#/nodes/" (:id item))
             :style {:color          "inherit"
                     :textDecoration "inherit"}}
         (comp/card

               {:width    30
                :position "center"} label))))])))

(defn- node-item
  [item]
  (let [cpu (-> item :resources :cpu (int))
