常见的lisp如何在二维数组中设置一个元素？

Question

我想我只是使用setq(或者setf,我不确定区别),但我不明白如何[i][j]在lisp中引用数组中的-th元素.

我的开始条件是这样的:

? (setq x (make-array '(3 3)))
#2A((0 0 0) (0 0 0) (0 0 0))

我想改变第三行"第二行"中的第二项来表示:

? ;;; What Lisp code goes here?!
#2A((0 0 0) (0 0 0) (0 "blue" 0))

以下,我认为接近,给出一个错误:

(setq (nth 1 (nth 2 x)) "blue")

那么正确的语法是什么？

谢谢!

Answer 1

我认为正确的方法是使用setf具有aref这样的:

(setf (aref x 2 1) "blue")

欲了解更多详情,请参见参考.

Answer 2

您可以ARRAY在Common Lisp HyperSpec中找到操作字典(ANSI Common Lisp标准的Web版本:

http://www.lispworks.com/documentation/lw50/CLHS/Body/c_arrays.htm

AREF并(SETF AREF)记录在这里:

http://www.lispworks.com/documentation/lw50/CLHS/Body/f_aref.htm

设置数组元素的语法是:(setf (aref array &rest subscripts) new-element).

基本上如果你想在Common Lisp中设置一些东西,你只需要知道如何获得它:

(aref my-array 4 5 2)  ; access the contents of an array at 4,5,2.

然后设置操作示意图:

(setf <accessor code> new-content)

这意味着:

(setf (aref my-array 4 5 2) 'foobar)   ; set the content of the array at 4,5,2 to
                                       ; the symbol FOOBAR