Arrays en LISP

LISP, es un procesamiento de listas, es un lenguaje de programación ampliamente utilizado para trabajar con la manipulación de datos. LISP nos permite producir arreglos de una o varias dimensiones usando la función make-array. Una array puede almacenar cualquier objeto LISP como sus elementos.

 

El número de índice de la array comienza desde 0 hasta el n-ésimo término.

Atributos:

• El atributo setf da una llamada a la función.
• El atributo aref permite acceder al nombre de la array y al valor del índice.
• El atributo my-array se usa para crear las celdas de la array.
• El atributo dotimes permite el bucle. El bucle comienza desde cero hasta el n-ésimo número definido por el usuario.
• El atributo tepri se usa para producir una nueva línea,
• El atributo de contenido inicial es una secuencia de estructuras anidadas. 

Ejemplo 1:  

// Making a file array
// lisp to print names
(setq myarray (make-array '() 
   :initial-contents 
   '(((Ayush Agarwal) (Piyush Goel)) 
      ((Keshav Kedia) (Gaurav Garg)) 
   ))
) 
(write myarray)
(terpri)

Producción:

 

Ejemplo 2:

// Lisp code for array
// Making a file array.lisp
// to print number from 10 to 19 .
(write (setf my-array (make-array '(10))))
(terpri)
(setf (aref my-array 0) 10)
(setf (aref my-array 1) 11)
(setf (aref my-array 2) 12)
(setf (aref my-array 3) 13)
(setf (aref my-array 4) 14)
(setf (aref my-array 5) 15)
(setf (aref my-array 6) 16)
(setf (aref my-array 7) 17)
(setf (aref my-array 8) 18)
(setf (aref my-array 9) 19)
(write my-array)

Salida :

 

Ejemplo 3:

//  Printing a table for 0 and 1 
// using LISP array
(setq a (make-array '(2 11)))
(dotimes (i 2)
   (dotimes (j 11)
      (setf (aref a i j) (list i 'x j '= (* i j)))
   )
)
(dotimes (i 2)
   (dotimes (j 11)
      (print (aref a i j))
   )
)

Producción:

 

Ejemplo 4:

// Making a file array.
// lisp to print alphabets from A to Z.
(setq myarray (make-array '() 
   :initial-contents 
   '(((a b c) (d e f)) 
      ((g h i) (j k l)) 
      ((m n o) (p q r) (s t u) (v w x y z)) 
   ))
) 
(write myarray)
(terpri)

Producción: