用法
评论
建议
取 消
确 定
(defun list:replace-index (oldlst index item) "按索引替换列表" "替换后的列表" "(list:reeplace-index '(0 1 2 3) 1 5)" (if (zerop index) (append (list item) (cdr oldlst)) (cons (car oldlst) (list:replace-index (cdr oldlst) (1- index) item))))
函数库使用说明
应用包
技术支持
统计信息
函数库规模: 733 个
函数库类别: 51 种
上传记录
刷新