Select Code to Download

>(set 'a (list 1 2 3))
Both return:
...
3     #Wrong!
Lisp returns:
(2 3) #Right!

(defun transpose (x) (apply 'mapcar (cons 'list x))

...
(transpose '((1 2 3) (4 5 6) (7 8 9) (10 11 12)))
Should product this output:
((1 4 7 10) (2 5 8 11) (3 6 9 12))