Matlab - Despeje de ecuación multivariable

clc

clear all

close all

syms ICX R mi

A=(pi*(R^4))/4;

B=((R^4)/4);

C=(-2*mi^3+6*mi^2-5*mi+1);

D=(sqrt(2*mi-mi^2));

E=(asin(1-mi));

solve('ICX==(A-B*((C*D)+E)',mi)

clc

clear all

syms ICX R mi

% R=rand;

% ICX=rand;

A=(pi*(R^4))/4;

B=(R^4)/4;

C=-2*mi^3+6*mi^2-5*mi+1;

D=sqrt(2*mi-mi^2);

E=asin(1-mi);

mi=solve(ICX==A-B*(C*D+E),mi)

clc

clear all

syms ICX R mi

 R=2;

 ICX=20*rand(1,6);

A=(pi*(R^4))/4;

B=(R^4)/4;

C=-2*mi^3+6*mi^2-5*mi+1;

D=sqrt(2*mi-mi^2);

E=asin(1-mi);

for i=1:length(ICX)

Mi(i,1)=solve(ICX(i)==A-B*(C*D+E),mi);

clc

end

R,

ICX

Mi

R =

     2

ICX =

    4.4762   15.0253    5.1019   10.1191   13.9815   17.8181

Mi =

  - 0.082884394086831890906263274088095 + 0.11519477291835053850991632795749i

     0.71362224315318853160740202927287 - 0.52786928051853914253480303868747i

 - 0.061751059357781415826749480629975 + 0.089808012191605932095726713866551i

                                           0.35753605081408368622998882918185

     0.75713292731118797952151869884227 + 0.44031075395816015489056171957697i

                                            1.8826141869522897095122729405775