配列を任意の値で埋める - lisp-cookbook-ja/common-lisp GitHub Wiki

配列

配列を任意の値で埋める

fill はシークエンス全般に適用できます。:start と :end で範囲を指定できます。省略すればすべての要素が指定したアイテムで埋まります。 また、 fill は破壊的に変更された元の配列を返します。

(let ((v (vector 0 1 2 3 4 5 6 7 8 9)))
  (fill v 88 :start 1 :end 4)
  v)
;=> #(0 88 88 88 4 5 6 7 8 9)