Try Ryacas:
> library(Ryacas)
> A <- Sym("A"); B <- Sym("B"); X <- Sym("X"); Y <- Sym("Y"); K <- Sym("K")
> Solve(K==(sin(A) * sin(B) ) + ( cos(A) * cos(B) * cos ( X - Y ) ), "X")
[1] "Starting Yacas!"
expression(list(X == Y + acos((K - sin(A) * sin(B))/(cos(A) *
cos(B))), X == Y - acos((K -
Dear R-gurus,
I know that it is not a R problem, but as need
to implement some solution for this on R, I would
like to know if someone help me on how to isolate
X on the expression below.
K=(sen A * sen B ) + ( cos A * cos B * cos ( X - Y ) )
Any help are welcome
mitinho astronauta
brazil
2 matches
Mail list logo