Из двух списков сделать один

@Platina · Регистрация: 09.04.2013

Author24 — интернет-сервис помощи студентам

С помощью функционала необходимо из двух списков: (1 2 3 4 ...) и (a b c d ...) сделать один список вида:
(a 1 b 2 c 3 d 4 ....).

Есть функционал mapcan:

(mapcan 'list '(a b c) '(1 2 3))

=> (a 1 b 2 c 3)

А как сделать список, который указан в задании (ведь он бесконечен)? Помогите пожалуйста!

@Catstail · 11.04.2013, 18:20

Я думаю, что в задании не имелись в виду бесконечные списки. mapcan применить можно. А можно и так:

Lisp

(defun zip (lst1 lst2)
 (reduce 'append (mapcar 'list lst1 lst2)))
 
==> zip
 
(zip '(a b c d) '(1 2 3 4))
 
==> (a 1 b 2 c 3 d 4)

@Platina · 11.04.2013, 18:26 **[ТС]**

Спасибо!

@Platina 4 / 4 / 1 Регистрация: 09.04.2013 Сообщений: 38
		1
	Из двух списков сделать один 11.04.2013, 18:09. Показов 1964. Ответов 2 Метки нет (Все метки) С помощью функционала необходимо из двух списков: (1 2 3 4 ...) и (a b c d ...) сделать один список вида: (a 1 b 2 c 3 d 4 ....). Есть функционал mapcan: (mapcan 'list '(a b c) '(1 2 3)) => (a 1 b 2 c 3) А как сделать список, который указан в задании (ведь он бесконечен)? Помогите пожалуйста! 0

@Platina 4 / 4 / 1 Регистрация: 09.04.2013 Сообщений: 38
	11.04.2013, 18:26 [ТС]	3
	Спасибо! 0

Опции темы