算法
青水
高级程序员,系统分析师
展开
-
JSON解析简单实现 之二
之前曾写过一次JSON解析,借助了读取器的功能,可惜效果不太令人满意。今天闲来无事,实现原生解析。本次实现有以下缺限: 1、没有充分优化代码 2、没有考虑转义字符解析(待后续实现);JSON 解析 WHJ.V1.20200119;-----------------------------------------------------------------------...原创 2020-01-19 12:57:01 · 247 阅读 · 0 评论 -
二叉排序树算法练手之CLISP实现
(in-package :cl-user)(defun reload () (load "h:/lisptool/btree.lsp"))(defvar *rootnode* nil)(defmacro node-level (node) `(getf ,node :level))(defmacro node-left (node) `(getf ,node :left))(defmacro no...原创 2018-03-04 22:26:52 · 148 阅读 · 0 评论 -
二叉排序树算法练手之CLISP实现【通用版】
(in-package :cl-user)(defun reload () (load "h:/lisptool/btree.lsp"))(defmacro node-level (node) `(getf ,node :level))(defmacro node-left (node) `(getf ,node :left))(defmacro node-right (node) `(getf ...原创 2018-03-05 23:46:21 · 349 阅读 · 0 评论 -
二叉排序树算法之CLISP实现 改进版【通用版】
主要改进:1、转换节点数据结构,list =>clsss node2、添加节点父元素(in-package :cl-user)(defun reload () (load "h:/lisptool/btree.lsp"))(defclass node () ((node-value :initarg :value :accessor node-value :initform ...原创 2018-03-07 22:15:37 · 222 阅读 · 0 评论 -
【clisp】实现读取CSV文件
csv文件: 1、每行数据集各元素以逗号间隔 2、若单元素中有逗号,则整个元素以双引号括起来为一个单元素 3、若双引号元素中又有双引号,则需要转义双引号为 \"以clisp为例实现 csv 文件读取,实现如下:read-csv-file: 可以直接读取一个csv文件,并以列表形式返回数据。split-c...原创 2018-08-25 15:41:22 · 663 阅读 · 3 评论