表里的数值元素用加号连接起来形成算式

wdmzslw · 发表于 2019-12-12 18:38:08

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

×

老师您好，请教一个问题。我想把一个表里的数值元素（全是数值元素，2个以上）用“+”连接起来，并用括号“（）”括起来，形成数学算式，例如：表（12.3 45.6 78.9）变成字符串“（12.3+45.6+78.9）”，该如何处理呢？请老师指教。

yangjian001 · 发表于 2019-12-12 19:13:57

做一个热心并受欢迎的人

aimisiyou · 发表于 2019-12-12 20:09:29

_$ (setq lst '(12.37 45.6 78.946))
(12.37 45.6 78.946)
_$ (strcat "(" (vl-string-translate " " "+" (vl-string-right-trim " " (apply 'strcat (mapcar '(lambda (x) (strcat x " "))(mapcar 'rtos lst))))) ")" )
"(12.37+45.6+78.946)"
_$

wdmzslw · 发表于 2019-12-12 22:49:35

aimisiyou 发表于 2019-12-12 20:09
_$ (setq lst '(12.37 45.6 78.946))
(12.37 45.6 78.946)
_$ (strcat "(" (vl-string-translate " " "+" ...

谢谢你！看过你的算法，经过启发，我自己也写了一个：
(setq lst '(12.37 45.6 78.946))
(vl-string-translate " " "+" (vl-princ-to-string lst))

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

[求助] 表里的数值元素用加号连接起来形成算式

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。