Решение систем уравнений в R

Символьное решение уравнения может быть достигнуто в R с помощью библиотеки Ryacas. Например,

library(Ryacas)
yacas("Solve(x/(1+x) == a, x)")

дает

expression(list(x == a/(1 - a)))

Кто-нибудь знает, как (символически) решить систему уравнений?

Спасибо.