|
From: | Vinicius Jose Latorre |
Subject: | Re: request for a new function, say, `sequence' |
Date: | Thu, 03 Apr 2003 23:11:50 -0300 |
User-agent: | Mozilla/5.0 (X11; U; Linux i686; en-US; rv:1.3) Gecko/20030312 |
Here is another implementation of number-sequence. It takes in consideration that the number can be an integer or float. Also have an INC argument. (defun number-sequence (from &optional to inc) (if (not to) (list from) (or inc (setq inc 1)) (let (seq) (while (<= from to) (setq seq (cons from seq) from (+ from inc))) (nreverse seq))))
[Prev in Thread] | Current Thread | [Next in Thread] |