Преобразование уравнения в код R

Question

У меня очень длинное выражение, которое я хочу преобразовать в 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)) 

Answer 1

Если вход имеет вид, показанный тогда было бы достаточно, чтобы заменить каждый пробел с * с помощью 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))"