从R中的表达式对象中提取字符串

Question

我需要从R中的表达式对象中提取一个字符串。这是代码：

> library(Ryacas)
> x <- Sym("x")
> fun <- expression(1/((exp(-x))+((0.24)+(0.78))))
> my.string <- Simplify.Expr((deriv(fun,x)))
> my.string

并获得此输出：

expression(exp(-x)/(exp(-x)^2 + 2.04 * exp(-x) + 1.0404))
There were 17 warnings (use warnings() to see them)

我只需要提取“表达式”一词，但是我尝试了几件事，但没有任何效果。

感谢所有帮助！