``` (defvar *vfruits* (coerce *fruits* 'vector)) (elt *vfruits* 3) (subseq *vfruits* 0 3) (defparameter *vfirst3* *) (subseq *vfruits* 1 3) (length *vfruits*) (- * 3) (adjust-array #() * :displaced-to *vfruits* :displaced-index-offset 3) (adjust-array *vfruits* 3) (concatenate 'vector ** *) ``` Note that I often use ANSI lisp's repl special variables like `*` "the last first return", `**` "the second-last first return". If you did not just mash `F8` in emacs eev to pitch that line by line into the repl like I did, here is a `vector`ful version of what we did with lists ``` CL-USER> (defvar *vfruits* (coerce *fruits* 'vector)) *VFRUITS* CL-USER> (elt *vfruits* 3) KIWI CL-USER> (subseq *vfruits* 0 3) #(WATERMELON APPLE LIME) CL-USER> (defparameter *vfirst3* *) *VFIRST3* CL-USER> (subseq *vfruits* 1 3) #(APPLE LIME) CL-USER> (length *vfruits*) 7 CL-USER> (- * 3) 4 CL-USER> (adjust-array #() * :displaced-to *vfruits* :displaced-index-offset 3) #(KIWI PEAR LEMON ORANGE) CL-USER> (adjust-array *vfruits* 3) #(WATERMELON APPLE LIME) CL-USER> (concatenate 'vector ** *) #(KIWI PEAR LEMON ORANGE WATERMELON APPLE LIME) CL-USER> ``` Seemingly unlike python, and unlike using `subseq` on a `sequence` resulting in a copied region list, using `adjust-array` to displace an empty lisp `vector` to be a region of another `vector` or `array` does not copy and results in a `displaced-array` (hence, `:displaced-to`).