用法
评论
建议
取 消
确 定
(defun list:item-num (lst / l2 tmp tmp1) "表中元素及数量" (while (setq l2 (cons (list (setq tmp1 (car lst)) (- (length lst) (length (setq tmp (vl-remove tmp1 lst))))) l2) lst tmp)) (reverse l2))
函数库使用说明
应用包
技术支持
统计信息
函数库规模: 733 个
函数库类别: 51 种
上传记录
刷新