matlab app encapsulation ?
37 vues (au cours des 30 derniers jours)
Afficher commentaires plus anciens
I have failed several times in encapsulation because the source code uses syms, but I don't know how to change it, or all the changes make me change too much, is there a good solution
syms pha H
term1 = 9 - 12 * (1 - P_ya .* F ./ (y .* H));
term2 = R .* sqrt(term1) - 3 .* R;
denominator = 2 .* H;
% pha
pha = atan(term2 ./ denominator);
%
% disp(pha);
pha_rad1=rad2deg(pha);
H_vals = linspace(50, 250, 50);
pha_vals = double(subs(pha_rad1, H, H_vals));
% Plot H versus pha
% figure(1);
plot(app.UIAxes,H_vals, pha_vals, 'b-', 'LineWidth', 2);
xlabel(app.UIAxes,'H');
ylabel(app.UIAxes,'pha');
title(app.UIAxes,'Plot of pha vs H');
% grid on;
% disp(pha_rad);
%
if K < 1
pha_rad = 45 - (P.*180) /(2.*pi);
elseif K < 2
pha_rad = 45;
else
pha_rad = 45 + (P.*180) /(2.*pi) ;
end
%
pha_rad = max(15, min(pha_rad, 65));
pha_rad = pha_rad * (pi / 180);
switch app.DropDown.Value
case '1'
if app.Button_2.Value==1
Vc2=(4.*pi.*R.^3)./3+pi.*R.^2*(L-2.*R);%
Ac2=pi.*R.^2+(L-2.*R).*2.*R;
Lc2=2*pi.*R+(L-2*R).*2;%
sigma2=Lc2.*H.*K.*y.*H./2;
Fbc2=Vc2.*10;%
Fbr2=Ac2.*10.*(H-L_s);
F2=Ac2.*P_ya;
Wr2=y.*H.*Ac2;%
t2=Lc2.*c.*H+sigma2.*tan(P)
eq=Wr2+t2==F.*(F2+Fbc2+Fbr2)
H_solution = double(solve(eq, H));
positiveValues = H_solution(H_solution > 0);
app.HEditField.Value=positiveValues;
app.Image.ImageSource = '1'; % 直接用路径
app.Image_2.ImageSource = '1'; % 直接
elseif app.Button.Value==1
Vc1=(4.*pi.*R.^3)./3+pi.*R.^2*(L-2.*R);;%
Ac1=pi.*R.^2;%
Lc1=2*pi.*R;%
sigma1=Lc1.*H.*K.*y.*H./2;%
Fbc1=Vc1.*10;%
Fbr1=Ac1.*10.*(H-L_s);%
F1=Ac1.*P_ya;%
Wr1=y.*H.*Ac1;%
t1=Lc1.*c.*H+sigma1.*tan(P)
eq=Wr1+t1==F.*(F1+Fbc1+Fbr1)
H_solution = double(solve(eq, H));
positiveValues = H_solution(H_solution > 0);
app.HEditField.Value=positiveValues;
app.Image.ImageSource = '2'; % 直接用路径
app.Image_2.ImageSource = '2'; % 直接用路径
end
case '3'
if app.Button_2.Value==1
Wr2=y.*pi.*(R.^2.*H+R.*H.^2.*tan(pha_rad)+(H.^3.*tan(pha_rad).^2)./3-2.*R.^3./3)
F2=pi.*R.^2.*P_ya
eq=Wr2==F.*F2
H_solution =vpasolve(eq, H);
positiveValues = H_solution(H_solution > 0);
app.HEditField.Value=double(positiveValues);
app.Image.ImageSource = '5'; % 直接用路径
app.Image_2.ImageSource = '5'; % 直接用路径
elseif app.Button.Value==1
Vc1=H.*(R.*2.*L+(H.*tan(pha_rad).*2+R.*2).*L+sqrt(R.*2.*L.*(H.*tan(pha_rad).*2+R.*2)*L))/3;
Ac1=L.*R.*2;%
F1=Ac1.*P_ya;%
Wr1=y.*Vc1;%
eq=Wr1==F.*F1
H_solution =vpasolve(eq, H);
positiveValues = H_solution(H_solution > 0);
app.HEditField.Value=double(positiveValues);
app.Image.ImageSource = '4'; % 直接用路径
app.Image_2.ImageSource = '4'; % 直接用路径
%%显示结果
end
0 commentaires
Réponses (1)
Sameer
le 8 Nov 2024 à 7:16
Hi @yan
To tackle the encapsulation issue, you can use "anonymous functions" or "numerical computations" instead of symbolic computations.
Here's how you can do it:
% Define constants and parameters
% Define a function for pha calculation
calculate_pha = @(H) atan((R .* sqrt(9 - 12 * (1 - P_ya .* F ./ (y .* H))) - 3 .* R) ./ (2 .* H));
% Calculate pha values over a range of H
H_vals = linspace(50, 250, 50);
pha_vals = arrayfun(@(H) rad2deg(calculate_pha(H)), H_vals);
% Plot H versus pha
plot(app.UIAxes, H_vals, pha_vals, 'b-', 'LineWidth', 2);
xlabel(app.UIAxes, 'H');
ylabel(app.UIAxes, 'pha');
title(app.UIAxes, 'Plot of pha vs H');
% Calculate pha_rad based on K
if K < 1
pha_rad = 45 - (P .* 180) / (2 .* pi);
elseif K < 2
pha_rad = 45;
else
pha_rad = 45 + (P .* 180) / (2 .* pi);
end
pha_rad = max(15, min(pha_rad, 65)) * (pi / 180);
switch app.DropDown.Value
case '1'
if app.Button_2.Value == 1
Vc2 = (4 .* pi .* R.^3) / 3 + pi .* R.^2 * (L - 2 .* R);
Ac2 = pi .* R.^2 + (L - 2 .* R) .* 2 .* R;
Lc2 = 2 * pi .* R + (L - 2 * R) .* 2;
sigma2 = Lc2 .* H_vals .* K .* y .* H_vals / 2;
Fbc2 = Vc2 .* 10;
Fbr2 = Ac2 .* 10 .* (H_vals - L_s);
F2 = Ac2 .* P_ya;
Wr2 = y .* H_vals .* Ac2;
t2 = Lc2 .* c .* H_vals + sigma2 .* tan(P);
eq = Wr2 + t2 == F .* (F2 + Fbc2 + Fbr2);
H_solution = H_vals(eq > 0);
positiveValues = H_solution(H_solution > 0);
app.HEditField.Value = positiveValues;
app.Image.ImageSource = '1';
app.Image_2.ImageSource = '1';
end
end
Hope this helps!
3 commentaires
Walter Roberson
le 10 Nov 2024 à 5:57
The code you posted has
H_vals = linspace(50, 250, 50);
If that range is too small, make the range larger.
Voir également
Catégories
En savoir plus sur Communications Toolbox dans Help Center et File Exchange
Produits
Community Treasure Hunt
Find the treasures in MATLAB Central and discover how the community can help you!
Start Hunting!