zwf100 发表于 2015-4-25 21:20:56

读取txt文件中的数据赋值给一个数组

大神们，txt文件中有一列数据，(ˇˍˇ） 想通过lisp语句读取并赋值到数组a()中，不知如何实现，请大神赐教。
如txt文件中有：
1.4
3.5
2.7
5.3
....

鱼与熊掌 发表于 2015-4-25 21:52:58

;读取文件夹里面的字符串生成表
(defun cx-read (txt_str / str_lst ff data)
(setq str_lst nil)
(if (setq ff (open txt_str "r"))
    (progn
      (while (setq data (read-line ff))
                                (setq str_lst (cons data str_lst))
      )
      (close ff)
    )
)
str_lst
)

zwf100 发表于 2015-4-25 22:14:34

鱼与熊掌 发表于 2015-4-25 21:52 static/image/common/back.gif


data数组中 第i个数 是不是表示为 data(i)

Andyhon 发表于 2015-4-26 16:55:57

请参阅 Nth / Car Cadr Caddr ... 函数

飞天鱼Tommy 发表于 2015-4-27 10:21:18

初初接触list，跟着学习了

heaven陌上花开 发表于 2020-2-27 11:23:44

如果是多维数组的矩阵怎么处理呢？？
页: [1]
查看完整版本: 读取txt文件中的数据赋值给一个数组