急~求助~如何循环设置变量？？

4041186888 · 发表于 2013-3-7 11:18

本帖最后由 4041186888 于 2013-3-7 11:29 编辑

比如读取一个DAT文档

1,2,3,4,5... ...n

复制代码

或者

1
2
3
4
5
... ...
n

复制代码

我想给每个数据设置一个变量比如(setq w1 1)...(setq w5 5)...(setq wn n)
因为每次运算dat数据的n都不一样，我想完善一个程序，在已知n的情况下如何利用循环分别给每个数据单独设置成变量Wn。这种情况可以实现么？相当于(setq a b)中 a可以为变量么在循环中每次循环a都会自己变化
各位大侠来点思路吧谢谢了在线等~

4041186888 · 发表于 2013-3-7 11:43

自己顶个~大侠告诉下呗~如果无法实现我也就老老实实的不乱想了~

Gu_xl · 发表于 2013-3-7 12:47

4041186888 发表于 2013-3-7 11:43
自己顶个~大侠告诉下呗~如果无法实现我也就老老实实的不乱想了~

(set (read (strcat "W" (itoa n))) n)

4041186888 · 发表于 2013-3-7 13:03

太谢谢版主了~~哇咔咔其实就是最基础的才容易忽略~原来set 再次感谢了~

xiabin68 · 发表于 2013-3-17 02:29

又学习了，

ll_j · 发表于 2013-3-17 08:26

G版告诉你的是一个方法，但在你的这种情况下是不太应该使用的，程序中当需要使用到很多类似的赋值时，应该用“数组”，在Lisp中就是一个包括很多原子的表，需要的时候，就从表中取值。变量使用多了，程序内存管理会复杂，运算变慢，甚至可能出现溢出的情况。

一般说来，set函数很少用，即使使用，也多数使用在“间接赋值”这种情况（可以见帮助文件）。

4041186888 · 发表于 2013-3-20 11:34

G版大大我突然又发现一个问题如此是可以设置变量了但是这个变量无法使用啊~比如变量我想提取变量W1...Wn的内容怎么提取啊？

jj2098 · 发表于 2013-3-20 11:47

(SETQ n 4)(EVAL (READ (STRCAT "(SETQ W" (ITOA n) " n)")))

?w4 --> 4

4041186888 · 发表于 2013-3-20 11:56

jj2098 发表于 2013-3-20 11:47
(SETQ n 4)(EVAL (READ (STRCAT "(SETQ W" (ITOA n) " n)")))

?w4 --> 4

这个必须得谢了~

账号		自动登录	找回密码
密码			注册

[函数] 急~求助~如何循环设置变量？？

点评