我有一个很长的表达式,我想转换成R代码。下面是一个示例,显示表达式的外观/编写方式:
(a exp(-a t) t^4)/(24 (a-b) (a-c) (a-d))
为了R可以理解,应在变量,括号等之间添加乘号*
。有没有办法自动执行此操作而不是手动插入?
表达式应如下所示:
(a *exp(-a*t) *t^4)/(24* (a-b)* (a-c)* (a-d))
答案 0 :(得分:3)
如果输入的格式是显示的,则使用gsub
替换每个空格就足够了,如下所示:
expr <- "(a exp(-a t) t^4)/(24 (a-b) (a-c) (a-d))"
gsub(" +", "*", expr)
## [1] "(a*exp(-a*t)*t^4)/(24*(a-b)*(a-c)*(a-d))"