用法
评论
建议
取 消
确 定
(defun list:split (lst x / lst2) "列表切分,不足部分省略,此函数返回结果相对list:split-2d、list:split-3d两个特殊函数比较合理" (foreach n lst (if (and lst2 (/= x (length (car lst2)))) (setq lst2 (cons (append (car lst2) (list n)) (cdr lst2))) (setq lst2 (cons (list n) lst2)))) (reverse lst2))
函数库使用说明
应用包
技术支持
统计信息
函数库规模: 733 个
函数库类别: 51 种
上传记录
刷新