xujinhua 发表于 2024-11-22 17:27:13

表相加

((25.6018 4.108 2.9695 2.5246 1.7299 36.9338 0 0 36.9338)(25.6018 4.108 0 0 0 29.7098 2.9907 10.1381 42.8386)(25.6018 4.108 0 0 0 29.7098 2.9907 10.1381 42.8386))


请教下，上表每个子表的数量都是一样的，怎样把上面的子表内对应相加返回一个表,谢谢，支持明经，意思50币
即返回(102.4072 12.32402.9695 2.5246 1.7299 121.95528.9721 30.4143161.3416)

wy8wd 发表于 2024-11-22 17:55:49

(setq lst '((25.6018 4.108 2.9695 2.5246 1.7299 36.9338 0 0 36.9338)(25.6018 4.108 0 0 0 29.7098 2.9907 10.1381 42.8386)(25.6018 4.108 0 0 0 29.7098 2.9907 10.1381 42.8386)))
(apply ' mapcar (cons ' + lst))

xujinhua 发表于 2024-11-22 18:10:37

wy8wd 发表于 2024-11-22 17:55
(setq lst '((25.6018 4.108 2.9695 2.5246 1.7299 36.9338 0 0 36.9338)(25.6018 4.108 0 0 0 29.7098 2.9 ...

谢谢你，能用，要麻烦你在我要回答那里回复下，才能给明经币:D-

Andyhon 发表于 2024-11-22 18:19:12



Command: (apply ' mapcar (cons ' + lst))
(76.8054 12.324 2.9695 2.5246 1.7299 96.3534 5.9814 20.2762 122.611)

==>
(102.4072 12.32402.9695 2.5246 1.7299 121.95528.9721 30.4143161.3416)
可以说说如何运算而来?

wy8wd 发表于 2024-11-22 18:21:44

(apply ' mapcar (cons ' + lst))
不客气

悟沧 发表于 2024-11-22 21:37:16


(apply ' mapcar (cons ' + lst))
页: [1]
查看完整版本: 表相加