Question

I have been searching everywhere for the following functionality in Lisp, and have gotten nowhere:

1. find the index of something in a list. example:

   (index-of item InThisList) 

2. replace something at a specific spot in a list. example:

   (replace item InThisList AtThisIndex) ;i think this can be done with 'setf'? 

3. return an item at a specific index. example:

   (return InThisList ItemAtThisIndex) 

Up until this point, I’ve been faking it with my own functions. I’m wondering if I’m just creating more work for myself.

This is how I’ve been faking number 1:

(defun my-index (findMe mylist)   (let ((counter 0) (found 1))     (dolist (item mylist)       (cond         ((eq item findMe) ;this works because 'eq' checks place in memory,                    ;and as long as 'findMe' was from the original list, this will work.          (setq found nil)         (found (incf counter))))   counter)) 

Answer 1

You can use setf and nth to replace and retrieve values by index.

(let ((myList '(1 2 3 4 5 6)))      (setf (nth 4 myList) 101); <----      myList)  (1 2 3 4 101 6) 

To find by index you can use the position function.

(let ((myList '(1 2 3 4 5 6)))      (setf (nth 4 myList) 101)      (list myList (position 101 myList)))  ((1 2 3 4 101 6) 4) 

I found these all in this index of functions.