Hi! Here I have a question.
Given a = b / c, S = ( ( b/c ) + 1 ) / ( b*( 1 - 1/c ) ).
Does anyone know how to convert ( ( b/c ) + 1 ) / ( b*( 1 - 1/c ) ) to ( a+1 ) / ( b-a ) with Mathematica?
Thanks!
Hi! Here I have a question.
Given a = b / c, S = ( ( b/c ) + 1 ) / ( b*( 1 - 1/c ) ).
Does anyone know how to convert ( ( b/c ) + 1 ) / ( b*( 1 - 1/c ) ) to ( a+1 ) / ( b-a ) with Mathematica?
Thanks!
I do not know now an easier way other that direct replacement and to expand the denominator. See FullForm of S0 to see the need rules.
Clear[a, b, c, S0]
S0 = ((b/c) + 1)/(b*(1 - 1/c))
rule = (b/c) -> a;
(Numerator[S0] /. rule)/(Expand@Denominator[S0] /. rule)

Complicated but good! Thank you!
A good way of eliminating c, is by using the command Eliminate, or by using it simply like this:
Solve[a==b/c,c]
((b/c)+1)/(b*(1-1/c)) /. %
Simplify[%]