LISP向量

  向量是一维数组，数组因此子类型。向量和列表统称序列。因此，我们迄今为止所讨论的所有序列的通用函数和数组函数，工作在向量上。

创建向量

向量函数使可以使用特定的值固定大小的向量。这需要任意数量的参数，并返回包含这些参数的向量。

示例1

创建一个名为main.lisp一个新的源代码文件，并在其中输入如下代码：

(setf v1 (vector 1 2 3 4 5))
(setf v2 #(a b c d e))
(setf v3 (vector 'p 'q 'r 's 't))
(write v1)
(terpri)
(write v2)
(terpri)
(write v3)

当执行代码，它返回以下结果：

#(1 2 3 4 5)
#(A B C D E)
#(P Q R S T)

请注意，LISP使用＃(...)语法为向量的文字符号。可以使用此＃(...)语法来创建并包含在代码中的文字向量。

然而，这些是文字向量，所以修改它们没有在LISP语言中定义。因此，对于编程，应始终使用向量函数，或者make-array函数来创建打算修改的向量。

make-array函数是比较通用的方式来创建一个矢量。可以访问使用aref函数的矢量元素。

示例 2

创建一个名为main.lisp一个新的源代码文件，并在其中输入如下代码：

(setq a (make-array 5 :initial-element 0))
(setq b (make-array 5 :initial-element 2))
(dotimes (i 5)
  (setf (aref a i) i))
(write a)
(terpri)
(write b)
(terpri)

当执行代码，它返回以下结果：

#(0 1 2 3 4)
#(2 2 2 2 2)

Fill 指针

make-array函数允许创建一个可调整大小的矢量。

函数fill-yiibaier参数跟踪实际存储在向量中的元素的数量。它的下一个位置，当添加元素的向量来填充的索引。

vector-push函数允许将元素添加到一个可调整大小的矢量的结束。它增加了填充指针加1。

vector-pop函数返回最近推条目，由1递减填充指针。

示例

创建一个名为main.lisp一个新的源代码文件，并在其中输入如下代码：

(setq a (make-array 5 :fill-yiibaier 0))
(write a)
(vector-push 'a a)
(vector-push 'b a)
(vector-push 'c a)
(terpri)
(write a)
(terpri)
(vector-push 'd a)
(vector-push 'e a)
;this will not be entered as the vector limit is 5
(vector-push 'f a)
(write a)
(terpri)
(vector-pop a)
(vector-pop a)
(vector-pop a)
(write a)

#()
#(A B C)
#(A B C D E)
#(A B)

向量是序列，所有序列函数是适用于向量。请参考序列章节，对向量函数。