如何设置Incanter中add-lines函数的线条颜色？

我刚好之前也碰到过类似的困扰！Incanter默认会循环使用彩虹色系给add-lines添加的线条上色，但其实只要显式指定样式参数，就能轻松让所有线条变成黑色，下面给你几种实用的方案：

方案1：每次调用add-lines时显式指定颜色 #

这是最直接的方式，add-lines支持:color参数，你可以直接传入:black关键字、RGB数组或者十六进制字符串来指定黑色：

(use '(incanter core charts))

;; 创建基础XY图表
(def base-chart (xy-plot [1 2 3] [4 5 6]))

;; 添加第一条黑色线条
(add-lines base-chart [1 2 3] [7 8 9] :color :black)

;; 添加第二条黑色线条，用RGB格式指定黑色
(add-lines base-chart [1 2 3] [10 11 12] :color [0 0 0])

;; 添加第三条黑色线条，用十六进制格式指定
(add-lines base-chart [1 2 3] [13 14 15] :color "#000000")

;; 渲染图表
(view base-chart)

方案2：封装辅助函数批量添加黑色线条 #

如果需要添加大量黑色线条，不想每次都重复写:color :black，可以封装一个简化版的函数：

(defn add-black-lines [chart x-data y-data]
  (add-lines chart x-data y-data :color :black))

;; 使用封装后的函数添加线条
(add-black-lines base-chart [1 2 3] [7 8 9])
(add-black-lines base-chart [1 2 3] [10 11 12])

方案3：全局修改默认线条颜色（按需使用） #

如果你希望所有后续创建的图表中，add-lines默认都用黑色，可以修改Incanter的全局样式配置：

(set-default-styles! :line-color :black)

;; 之后创建的图表，add-lines默认都会用黑色
(def new-chart (xy-plot [1 2] [3 4]))
(add-lines new-chart [1 2] [5 6]) ;; 这条线条自动是黑色

⚠️ 注意：这个设置会影响所有后续的图表，如果你只是需要当前图表的线条为黑色，优先用前两种方案更灵活。

另外需要确认一下你的Incanter版本，较旧的版本可能对样式参数的支持有限，如果遇到参数不生效的情况，建议升级到最新稳定版。

内容的提问来源于stack exchange，提问作者Sebastian Oberhoff