transpose
Location: lib, 2 Lines
; Scheme 9 from Empty Space, Function Library ; By Nils M Holm, 2009 ; Placed in the Public Domain ; ; (transpose list) ==> list ; ; Transpose a matrix. A matrix is represented by a nested list, ; where each inner list is a column of the matrix. ; ; Example: (transpose '((1 2 3) (4 5 6))) ==> ((1 4) (2 5) (3 6)) (define (transpose x) (apply map list x))