活动介绍

用二分法求解A*sin(w*x)+k*exp(L*x)代码

时间: 2024-06-22 09:02:29 浏览: 125
使用二分法(Binary Search)求解非线性方程 `A*sin(w*x) + k*exp(L*x) = 0` 的数学问题时,你需要编写一个迭代算法,该算法在给定一定精度要求的情况下,不断缩小搜索范围,直到找到方程的根。这是一种数值方法,通常用于没有封闭形式解的问题。 以下是 Python 中的一个基本示例,使用 `scipy.optimize.bisect` 函数实现二分法: ```python import numpy as np from scipy.optimize import bisect def equation(x, A, w, k, L): return A * np.sin(w * x) + k * np.exp(L * x) def bisection_method(A, w, k, L, initial_guess, tolerance=1e-6, max_iterations=100): def interval_search(start, end): guess = start + (end - start) / 2 if abs(equation(guess, A, w, k, L)) < tolerance: return guess elif equation(start, A, w, k, L) * equation(guess, A, w, k, L) > 0: # 如果在开始和猜测值之间,向左搜索 return interval_search(start, guess) else: # 否则,在猜测值和结束之间搜索 return interval_search(guess, end) root = interval_search(initial_guess, 1e6) # 初始区间设置为足够大的数防止溢出 if abs(equation(root, A, w, k, L)) > tolerance: print(f"未能找到满足条件的根,可能需要更精确的初始猜测或增加迭代次数") return root # 示例用法 A, w, k, L = 1, 2, 3, 4 # 假设这些是你的系数 initial_guess = 0.1 # 初始猜测的根位置 root = bisection_method(A, w, k, L, initial_guess) ```
阅读全文

相关推荐

import numpy as np import matplotlib.pyplot as plt # 材料参数假设(用户未提供) k = 0.5 # 导热系数 (W/m·K) rho = 1000 # 密度 (kg/m³) cp = 4000 # 比热容 (J/kg·K) alpha = k / (rho * cp) # 热扩散率 (m²/s) # 几何参数 Lx = 0.05 # x方向半长 (m) Ly = 0.01 # y方向半宽 (m) Lz = 0.02825 # z方向半高 (m) # 热物性参数 h = 500 # 对流换热系数 (W/m²·K) T0 = 20 # 初始温度 (°C) Tf = 100 # 介质温度 (°C) # 计算毕渥数 Bi_x = h * Lx / k Bi_y = h * Ly / k Bi_z = h * Lz / k # 时间数组 (0-60秒) time = np.linspace(0, 60, 61) def find_root(bi, n): """ 二分法求解特征方程 λ*tan(λ) = Bi """ a = (n - 1) * np.pi b = (n - 0.5) * np.pi - 1e-9 # 避开奇点 for _ in range(100): c = (a + b) / 2 fc = c * np.tan(c) - bi if fc < 0: a = c else: b = c if (b - a) < 1e-6: return (a + b) / 2 return (a + b) / 2 def calculate_theta(roots, L, t, position='center'): """ 计算一维无量纲温度 """ theta = 0.0 for lam in roots: # 系数项计算 C = (2 * np.sin(lam)) / (lam + np.sin(lam)*np.cos(lam)) # 指数项 Fo = alpha * t / L**2 exp_term = np.exp(-lam**2 * Fo) # 空间项 if position == 'center': space_term = 1.0 else: space_term = np.cos(lam) theta += C * exp_term * space_term # 收敛判断 if abs(C * exp_term * space_term) < 1e-4: break return theta # 求每个方向的前5个根 roots_x = [find_root(Bi_x, n) for n in range(1, 6)] roots_y = [find_root(Bi_y, n) for n in range(1, 6)] roots_z = [find_root(Bi_z, n) for n in range(1, 6)] # 计算温度曲线 Tc = [] # 中心温度 Ta = [] # 表面温度(假设三个方向表面) for t in time: # 三维中心温度 theta_x = calculate_theta(roots_x, Lx, t, 'center') theta_y = calculate_theta(roots_y, Ly, t, 'center') theta_z = calculate_theta(roots_z, Lz, t, 'center') Tc.append(Tf + (T0 - Tf) * theta_x * theta_y * theta_z) # 三维表面温度(三个方向表面) theta_x_s = calculate_theta(roots_x, Lx, t, 'surface') theta_y_s = calculate_theta(roots_y, Ly, t, 'surface') theta_z_s = calculate_theta(roots_z, Lz, t, 'surface') Ta.append(Tf + (T0 - Tf) * theta_x_s * theta_y_s * theta_z_s) # 绘图 plt.figure(figsize=(10, 6)) plt.plot(time, Tc, label='中心温度 Tc') plt.plot(time, Ta, label='表面温度 Ta', linestyle='--') plt.xlabel('时间 (秒)') plt.ylabel('温度 (℃)') plt.title('温度随时间变化曲线') plt.legend() plt.grid(True) plt.show() 帮我把以上代码转换成matlab语言

% 材料参数假设(用户未提供) k = 0.5; % 导热系数 (W/m·K) rho = 1000; % 密度 (kg/m³) cp = 4000; % 比热容 (J/kg·K) alpha = k / (rho * cp); % 热扩散率 (m²/s) % 几何参数 Lx = 0.05; % x方向半长 (m) Ly = 0.01; % y方向半宽 (m) Lz = 0.02825; % z方向半高 (m) % 热物性参数 h = 500; % 对流换热系数 (W/m²·K) T0 = 20; % 初始温度 (°C) Tf = 100; % 介质温度 (°C) % 计算毕渥数 Bi_x = h * Lx / k; Bi_y = h * Ly / k; Bi_z = h * Lz / k; % 时间数组 (0-60秒) time = linspace(0, 60, 61); % 求每个方向的前5个根 roots_x = arrayfun(@(n) find_root(Bi_x, n), 1:5); roots_y = arrayfun(@(n) find_root(Bi_y, n), 1:5); roots_z = arrayfun(@(n) find_root(Bi_z, n), 1:5); % 预分配数组 Tc = zeros(size(time)); % 中心温度 Ta = zeros(size(time)); % 表面温度(假设三个方向表面) % 计算温度曲线 for i = 1:length(time) t = time(i); % 三维中心温度 theta_x = calculate_theta(roots_x, Lx, t, 'center'); theta_y = calculate_theta(roots_y, Ly, t, 'center'); theta_z = calculate_theta(roots_z, Lz, t, 'center'); Tc(i) = Tf + (T0 - Tf) * theta_x * theta_y * theta_z; % 三维表面温度 theta_x_s = calculate_theta(roots_x, Lx, t, 'surface'); theta_y_s = calculate_theta(roots_y, Ly, t, 'surface'); theta_z_s = calculate_theta(roots_z, Lz, t, 'surface'); Ta(i) = Tf + (T0 - Tf) * theta_x_s * theta_y_s * theta_z_s; end % 绘图 figure('Position', [100 100 1000 600]) plot(time, Tc, 'LineWidth', 1.5) hold on plot(time, Ta, '--', 'LineWidth', 1.5) xlabel('时间 (秒)') ylabel('温度 (℃)') title('温度随时间变化曲线') legend('中心温度 Tc', '表面温度 Ta', 'Location', 'best') grid on hold off % ========== 自定义函数 ========== function lam = find_root(bi, n) % 二分法求解特征方程 λ*tan(λ) = Bi a = (n - 1) * pi; b = (n - 0.5) * pi - 1e-9; % 避开奇点 for iter = 1:100 c = (a + b)/2; fc = c * tan(c) - bi; if fc < 0 a = c; else b = c; end if (b - a) < 1e-6 lam = (a + b)/2; return end end lam = (a + b)/2; end function theta = calculate_theta(roots, L, t, position) % 计算一维无量纲温度 theta = 0.0; for j = 1:length(roots) lam = roots(j); % 系数项计算 C = (2 * sin(lam)) / (lam + sin(lam)*cos(lam)); % 指数项 Fo = alpha * t / L^2; exp_term = exp(-lam^2 * Fo); % 空间项 if strcmp(position, 'center') space_term = 1.0; else space_term = cos(lam); end theta = theta + C * exp_term * space_term; % 收敛判断 if abs(C * exp_term * space_term) < 1e-4 break end end end 以上是完整matlab代码,错误使用 alpha 输出参数太多。 出错 cft>calculate_theta (第 92 行) Fo = alpha * t / L^2; 出错 cft (第 39 行) theta_x = calculate_theta(roots_x, Lx, t, 'center');根据提示的修改意见,告诉我该怎么修改

clc;clear;close all; D=6; B=pi*D/4; gamma2=20; cc1_value=15; beita=0; C=2*D; fai_range=25:1:45; fai_value=deg2rad(fai_range); FOS_results = zeros(size(fai_value)); for ii=1:length(fai_value) fai=fai_value(ii); FOS0=1.0; toler=1e-3;%收敛误差 max_iter=1000;%最大迭代次数 step=0.1;%步长 for iter=1:max_iter cc1=cc1_value./FOS; fai1=atan(tan(fai)./FOS); delta=0.8*fai1; alpha2=pi/4+fai1/2; L=D/tan(alpha2); Ka=(1-sin(fai1))./(1+sin(fai1)); theta2=pi/4+fai1/2; f_11=(Ka-(Ka.*sin(theta2)^2)./3+sin(theta2)^2./3)./(sin(theta2)^2+Ka.*cos(theta2)^2); f_12=f_11.*cos(theta2)^2+sin(theta2)^2./3-1; f_31=(1-Ka).*cos(fai1)./(2.*(sin(theta2)^2+Ka.*cos(theta2)^2)); f_32=cos(fai1)./(2.*(sin(theta2)^2+Ka.*cos(theta2)^2)); f_21=(Ka.*(1+sin(fai1))+(1-sin(fai1)))./(2.*(sin(theta2)^2+Ka.*cos(theta2)^2)); f_22=(cos(theta2)^2-sin(theta2)^2-sin(fai1))./(2.*(sin(theta2)^2+Ka.*cos(theta2)^2)); Kanw0=1-sin(fai1) C01_D=C./D; Cpie=L/Kanw0; Ve=pi*B*Cpie*L/4; Se=B*L; C01=min(Ve./Se,C);%筒仓高度 P=2.*cc1.*sqrt(Ka).*(f_32-f_31.*f_12./f_11); E=f_31./f_11; J=2*(B+L)./(B*L); Q1=0+gamma2.*(C-C01); Q=(gamma2-J.*P)./(J.*E)+(Q1-(gamma2-J.*P)./(J.*E)).*exp(-J.*E.*C01);%筒仓传递下来的 theta=pi/2-1/2.*(asin(sin(delta)./sin(fai1)))+delta./2; Kanw1=3.*(cos(theta).^2+Ka.*sin(theta).^2)./(3-(1-Ka).*cos(theta).^2); Kanw2=3.*(cos(theta2).^2+Ka.*sin(theta2).^2)./(3-(1-Ka).*cos(theta2).^2); A1=Kanw1.*tan(delta);%tao_aw %tao_s A2=3*(1-Ka)*cos(fai1)/(2*(3-(1-Ka)*cos(theta)^2)); %seigema_s A3=3*(1-Ka)*cos(fai1)^2.*cot(alpha2)/(2*sin(fai1)*(3-(1-Ka)*cos(theta)^2)); %seigema_anw A4=Kanw1.*tan(beita); %tao_aw B1=cc1.*tan(delta).*(1+(1-Ka).*(((Kanw1*cos(theta).^2)/3)-sin(theta).^2))./tan(fai1);%tao_aw %tao_s B2=cc1*(1-Ka)*cos(fai1).^2./2*sin(fai1); B2=B2*(1+(1-Ka)*cos(theta)^2./3*(3-(1-Ka)*cos(theta)^2)); %seigema_s B3=cc1*(1-Ka)*cos(fai1).^2.*cot(alpha2)/(2*tan(fai1)*sin(fai1)); B3=B3*(1+(1-Ka)*cos(theta)^2./3*(3-(1-Ka)*cos(theta)^2))-cc1*cot(alpha2)./tan(fai1); %seigema_anw B4=cc1*(1-Ka)*tan(beita).*(((Kanw1*cos(theta).^2)/3)-sin(theta).^2)./tan(fai1); yita_1=A1+A2+A3+A4; yita_2=B1+B2+B3+B4; r=gamma2-2*cc1*sin(alpha2)./B;%对比时把后面的去掉 s=yita_1./(cot(alpha2)+tan(beita)); t=2*sin(alpha2)*Kanw2*tan(fai1)./B; kesi=yita_2./(cot(alpha2)+tan(beita)); tspan=[0 5.99]; f=@(z,q) [(r-kesi./(D-z))-((s-1)./(D-z)+t)*q] q0=Q; [z,q]=ode45(f, tspan, q0) seigema_h=Kanw1*q+cc1*(1-Ka).*(Kanw1*cos(theta).^2/3-sin(theta).^2)./tan(fai1);%水平土压力 if abs(seigema_h)<toler break; end grid off; box off; set(gca, 'LineWidth', 1.5, 'FontSize', 15, 'FontName', 'Times New Roman'); xlabel('$\varphi (^{\circ})$', 'Interpreter', 'latex', 'FontSize', 14, 'FontName', 'Times New Roman'); ylabel('$\sigma_{\mathrm{T}} / \gamma D$', 'FontSize', 14, 'FontName', 'Times New Roman', 'Interpreter', 'latex'); legend_labels = arrayfun(@(C) sprintf('$C/D=%.1f$', C/D), C_values, 'UniformOutput', false); legend(legend_labels, 'Location', 'northeast', 'Orientation', 'vertical', ... 'FontSize', 14, 'FontName', 'Times New Roman', 'Interpreter', 'latex', 'Box', 'off'); 这是我写的程序,可能有一些错误,帮我用简单迭代法求解安全系数FOS

clc;clear;close all; D=6; gamma2=20; B=pi*D/4; Q1=0;%地表荷载 fai_1=deg2rad(30); cc_1=2; cc1=@(FOS) cc_1./FOS; fai1=@(FOS) atan(tan(fai_1)./FOS); theta2=@(FOS) pi/4+fai1/2; alpha2=@(FOS) pi/4+fai1/2; L=@(FOS) D/tan(alpha2); Ka=@(FOS) (1-sin(fai1))./(1+sin(fai1)); f_11=@(FOS) (Ka-(Ka.*sin(theta2)^2)./3+sin(theta2)^2./3)./(sin(theta2)^2+Ka.*cos(theta2)^2); f_12=@(FOS) f_11.*cos(theta2)^2+sin(theta2)^2./3-1; f_31=@(FOS) (1-Ka).*cos(fai1)./(2.*(sin(theta2)^2+Ka.*cos(theta2)^2)); f_32=@(FOS) cos(fai1)./(2.*(sin(theta2)^2+Ka.*cos(theta2)^2)); f_21=@(FOS) (Ka.*(1+sin(fai1))+(1-sin(fai1)))./(2.*(sin(theta2)^2+Ka.*cos(theta2)^2)); f_22=@(FOS) (cos(theta2)^2-sin(theta2)^2-sin(fai1))./(2.*(sin(theta2)^2+Ka.*cos(theta2)^2)); Kanw0=@(FOS) f_21./f_11; C=10; Cpie=@(FOS) L/Kanw0; Ve=@(FOS) pi*B*Cpie*L/4; Se=@(FOS) B*L; C01=@(FOS) min(Ve./Se,C);%筒仓高度 beita=0; figure; hold on; P=@(FOS) 2.*cc1.*sqrt(Ka).*(f_32-f_31.*f_12./f_11); E=@(FOS) f_31./f_11; J=@(FOS) 2*(B+L)./(B*L); Q=@(FOS) (gamma2-J.*P)./(J.*E)+(Q1-(gamma2-J.*P)./(J.*E)).*exp(-J.*E.*C01); delta=@(FOS) 0.8*fai1; theta=@(FOS) pi/2-1/2.*(asin(sin(delta)./sin(fai1)))+delta./2; Kanw1=@(FOS) 3.*(cos(theta).^2+Ka.*sin(theta).^2)./(3-(1-Ka).*cos(theta).^2); Kanw2=@(FOS) 3.*(cos(theta2).^2+Ka.*sin(theta2).^2)./(3-(1-Ka).*cos(theta2).^2); A1=@(FOS) Kanw1.*tan(delta);%tao_aw %tao_s A2=@(FOS) 3*(1-Ka)*cos(fai1)/(2*(3-(1-Ka)*cos(theta)^2)); %seigema_s A3=@(FOS) 3*(1-Ka)*cos(fai1)^2.*cot(alpha2)/(2*sin(fai1)*(3-(1-Ka)*cos(theta)^2)); %seigema_anw A4=@(FOS) Kanw1.*tan(beita); %tao_aw B1=@(FOS) cc1.*tan(delta).*(1+(1-Ka).*(((Kanw1*cos(theta).^2)/3)-sin(theta).^2))./tan(fai1);%tao_aw %tao_s B2=@(FOS) cc1*(1-Ka)*cos(fai1).^2./2*sin(fai1); B2=@(FOS) B2*(1+(1-Ka)*cos(theta)^2./3*(3-(1-Ka)*cos(theta)^2)); %seigema_s B3=@(FOS) cc1*(1-Ka)*cos(fai1).^2.*cot(alpha2)/(2*tan(fai1)*sin(fai1)); B3=@(FOS) B3*(1+(1-Ka)*cos(theta)^2./3*(3-(1-Ka)*cos(theta)^2))-cc1*cot(alpha2)./tan(fai1); %seigema_anw B4=@(FOS) cc1*(1-Ka)*tan(beita).*(((Kanw1*cos(theta).^2)/3)-sin(theta).^2)./tan(fai1); yita_1=@(FOS) A1+A2+A3+A4; yita_2=@(FOS) B1+B2+B3+B4; r=@(FOS) gamma2-2*cc1*sin(alpha2)./B; s=@(FOS) yita_1./(cot(alpha2)+tan(beita)); t=@(FOS) 2*sin(alpha2)*Kanw2*tan(fai1)./B; kesi=@(FOS) yita_2./(cot(alpha2)+tan(beita)); tspan=[0 5.99]; f=@(z,q) [(r-kesi./(D-z))-((s-1)./(D-z)+t)*q] q0=Q; [z,q]=ode45(f, tspan, q0) seigama_anw=@(FOS) Kanw1*q+cc1*(1-Ka).*(Kanw1*cos(theta).^2/3-sin(theta).^2)./tan(fai1);%水平土压力 用cc1=@(FOS) cc_1./FOS; fai1=@(FOS) atan(tan(fai_1)./FOS);这两个求安全系数的公式,算一下,安全系数的曲线,具体思路是怎么算呢,是要循环安全系数FOS吗

% 椭圆轨道 clear all clc % 碎片参数 m0 = 10; % 碎片质量,单位 kg Cd = 2; % 阻力系数 A = 0.05; % 截面积,单位 m^2 B = m0 / (Cd * A); F_107 = 138; Ap = 4; % 轨道参数 Re = 6378e3; % 地球半径,单位 m hp = 247e3; % 近地点高度,单位 m ha = 247e3: 1e3: 2000e3; % 远地点高度,单位 m % rp0 = hp + Re; % 近地点半径,单位 m % ra = ha + Re; % 远地点半径,单位 m % a = (ra + rp0) / 2;% 轨道半长轴,单位 m % e = 1 - rp0 ./ a; % 偏心率,单位 rad mu = 3.986e14; % 引力参数m^3/s^2 f = 0; % 真近点角,单位 rad h_L = 133.8e3; % 再入高度,单位 m r_L = h_L + Re; % 再入半径,单位 m for i = length(ha) rp0 = hp + Re; % 近地点半径,单位 m ra0 = ha(i) + Re; % 远地点半径,单位 m a0 = (rp0 + ra0)/2; % 半长轴,单位 m e0 = 1 - rp0 / a0; % 偏心率 % 不同初始椭圆轨道的初始条件 y0 = [a0; e0]; tspan = [0 3000*24*3600];% 时间范围(初始猜测) % 事件函数:当r_p <= r_L时停止积分 options = odeset('Events', @(t,y) stopCondition1(t, y), 'RelTol', 1e-12,'MaxStep', 10000); [t, y] = ode45(@(t,y) dy_dt(t, y, B, mu, F_107, Ap), tspan, y0, options); % 记录碎片寿命 t_Life(i) = t(end) / (3600 * 24);% 单位 天 end % for i = 1: length(ha) % % rp0 = hp + Re; % 近地点半径,单位 m % ra0 = ha(i) + Re; % 远地点半径,单位 m % a0 = (rp0 + ra0)/2; % 半长轴,单位 m % e0 = 1 - rp0 / a0; % 偏心率 % % % 不同初始椭圆轨道的初始条件 % y0 = [0; a0; e0]; % 初始时间 % rp_span = [rp0 r_L]; % 近地点半径积分范围 % [rp, y] = ode45(@(rp,y) dt_dy(rp, y, B, mu, F_107, Ap), rp_span, y0); % % % 记录碎片寿命 % t_Life(i) = y(end,1); % % end plot(ha/1e3, t_Life); xlabel('远地点高度 (km)'); ylabel('轨道寿命 (天)');function dydt = dy_dt(t, y, B, mu, F_107, Ap) a = y(1); e = y(2); % rp = a * (1 - e); n = sqrt(mu / a^3); M0 = 0; t0 = 0; M = M0 + n * (t - t0); E = solve_kepler(M, e); f = 2 * atan2(sqrt((1+e)/(1-e)) * sin(E/2), cos(E/2)); % % 计算远地点半径 % r_a = a * (1 + e); % % % 检查并交换 r_p 和 r_a % if r_a < r_p % temp = r_p; % r_p = r_a; % r_a = temp; % end % % % 重新计算 a 和 e % a = (r_p + r_a) / 2; % e = 1 - r_p / a; v = sqrt(mu / a * (1 + 2 * e * cos(f) + e^2) / (1 - e^2)); % f = 0; % vp = sqrt(mu * (2 / r_p - 1 / a)); % 近地点轨道速度,单位 m/s h = a - 6378e3; % 大气模型 T = 900 + 2.5 * (F_107 - 70) + 1.5 * Ap; % 温度,单位 K m = 27 - 0.012 * (h / 1e3 - 200); % 摩尔质量 H = T *1000 / m; % 大气标高,单位 m p = 6e-10 * exp(-(h - 175e3) / H); % 大气密度,单位 kg/m^3 % p = 2.789e-10 * exp(-(h - 200e3) / 37.105e3); % 大气密度,单位 kg/m^3 % T0 = 2 * pi * sqrt(a^3 / mu);% 轨道周期 da_dt = a^2 * v^3 * p / (mu * B); de_dt = -v * (e + cos(f)) * p / B; % drp_dt = a * vp * p * (-1/mu * a * vp^2 * (1 - e) + (e + cos(f))) / B; % n = sqrt(mu / a^3); % da_dt = -(p / B) * n * a^2 * (1 + 2 * e + e^2)^1.5 / (1 - e^2)^1.5; % de_dt = -p / B * n *a * (1 + e) * (1 + 2 * e + e^2)^0.5 / sqrt(1 - e^2); % drp_dt = da_dt * (1 - e) - a * de_dt; dydt = [da_dt; de_dt]; endfunction E = solve_kepler(M, e) % 输入: % M - 平近点角 (弧度) % e - 离心率 (0 ≤ e < 1) % 输出: % E - 偏近点角 (弧度) % 初始猜测 (E0 = M 对小离心率有效) E = M; tol = 1e-12; % 收敛容差 max_iter = 100; % 最大迭代次数 for i = 1:max_iter f = E - e * sin(E) - M; % 方程 f(E) = 0 df = 1 - e * cos(E); % 导数 df/dE delta = f / df; % 牛顿法修正量 E = E - delta; % 更新E % 检查收敛条件 if abs(delta) < tol break; end end % 若未收敛则报错 if i == max_iter warning('未达到收敛容差!'); end end警告: 未达到收敛容差! > 位置:solve_kepler (第 28 行) 位置: dy_dt (第 11 行) 位置: lab1>@(t,y)dy_dt(t,y,B,mu,F_107,Ap) (第 41 行) 位置: ode45 (第 305 行) 位置: lab1 (第 41 行)

给我按文献中的公式中安全系数FOSI的公式(即FOSI=cc1/cc1'=tan(fai1)/tan(fai1')),改变粘聚力(cc1)和内摩擦角(fai1)增加安全系数FOSI,直到使得程序中seigema_anw=0时,此时得到的即为安全系数,求出安全系数的曲线。给出具体思路。程序如下:clc;clear;close all; gamma2=16.1; fai1=deg2rad(38); D=5; C=[0.20:0.25:4]*D; B=pi*D/4; cc1=0.*gamma2*D; Q=0; %地表荷载 delta=0.6.*fai1; %alpha2=deg2rad(71); alpha2=deg2rad(55)+fai1/2; L=D/tan(alpha2); Ka=(1-sin(fai1))./(1+sin(fai1)); %R=D/(2*sqrt(tan(alpha2))); %Ke=1-sin(fai1); %Kp=tan(pi/4+fai1/2).^2; %theta11=atan((Kp-1)+sqrt((Kp-1)^2-4*Kp*tan(delta).^2)./(2*tan(delta)));%Chen %Ka1=tan(pi/4-fai1/2)^2; %Kw=(cos(theta11).^2+Ka1.*sin(theta11).^2)./(1-((1-Ka1).*cos(theta11).^2)/3);%Paik and Salgado(2003)小主应力 % theta2=atan((Kp-1)+sqrt((Kp-1)^2+4*Kp*tan(delta).^2)./(2*tan(delta))) % theta=pi/4+fai1/2; theta=pi/2-1/2.*(asin(sin(delta)./sin(fai1)))+delta./2; theta2=pi/4+fai1/2; beita=0; %Kf=(cos(theta11).^2+Ka1.*sin(theta11).^2)./(((1-Ka1).*sin(theta11).^2)/3+Ka1);%Chen(2015)大主应力 %%%%%楔形体 Kanw1=3.*(cos(theta).^2+Ka.*sin(theta).^2)./(3-(1-Ka).*cos(theta).^2);%23年小主应力 Kanw2=3.*(cos(theta2).^2+Ka.*sin(theta2).^2)./(3-(1-Ka).*cos(theta2).^2); %tao_aw A1=Kanw1.*tan(delta); %tao_s A2=3*(1-Ka)*cos(fai1)/(2*(3-(1-Ka)*cos(theta)^2)); %A2=0; %seigema_s A3=3*(1-Ka)*cos(fai1)^2.*cot(alpha2)/(2*sin(fai1)*(3-(1-Ka)*cos(theta)^2)); %seigema_anw A4=Kanw1.*tan(beita); %tao_aw B1=cc1.*tan(delta).*(1+(1-Ka).*(((Kanw1*cos(theta).^2)/3)-sin(theta).^2))./tan(fai1); %tao_s B2=cc1*(1-Ka)*cos(fai1).^2./2*sin(fai1);%tao_s B2=B2*(1+(1-Ka)*cos(theta)^2./3*(3-(1-Ka)*cos(theta)^2)); %seigema_s B3=cc1*(1-Ka)*cos(fai1).^2.*cot(alpha2)/(2*tan(fai1)*sin(fai1)); B3=B3*(1+(1-Ka)*cos(theta)^2./3*(3-(1-Ka)*cos(theta)^2))-cc1*cot(alpha2)./tan(fai1); %seigema_anw B4=cc1*(1-Ka)*tan(beita).*(((Kanw1*cos(theta).^2)/3)-sin(theta).^2)./tan(fai1); yita_1=A1+A2+A3+A4; yita_2=B1+B2+B3+B4; r=gamma2-2*cc1*sin(alpha2)./B;%对比时把后面的去掉 s=yita_1./(cot(alpha2)+tan(beita)); t=2*sin(alpha2)*Kanw2*tan(fai1)./B; kesi=yita_2./(cot(alpha2)+tan(beita)); %筒仓体 f_11=(Ka-(Ka.*sin(theta2)^2)./3+sin(theta2)^2./3)./(sin(theta2)^2+Ka.*cos(theta2)^2); f_12=f_11.*cos(theta2)^2+sin(theta2)^2./3-1; f_31=(1-Ka).*cos(fai1)./(2.*(sin(theta2)^2+Ka.*cos(theta2)^2)); f_32=cos(fai1)./(2.*(sin(theta2)^2+Ka.*cos(theta2)^2)); f_21=(Ka.*(1+sin(fai1))+(1-sin(fai1)))./(2.*(sin(theta2)^2+Ka.*cos(theta2)^2)); f_22=(cos(theta2)^2-sin(theta2)^2-sin(fai1))./(2.*(sin(theta2)^2+Ka.*cos(theta2)^2)); Kanw0=f_21./f_11; %大主应力侧压力系数(根据东北大学来的) Cpie=L/Kanw0; Ve=pi*B*Cpie*L/4; Se=B*L; C01=min(Ve./Se,C);%筒仓高度 C01_D=C/D; P=2.*cc1.*sqrt(Ka).*(f_32-f_31.*f_12./f_11); E=f_31./f_11; J=2*(B+L)./(B*L); q2=(gamma2-J.*P)./(J.*E)+(Q-(gamma2-J.*P)./(J.*E)).*exp(-J.*E.*C01); figure; hold on; tspan=[0 D-0.01];%楔形体 f=@(z,q) [(r-kesi./(D-z))-((s-1)./(D-z)+t)*q] q0=q2; [z,q]=ode45(f, tspan, q0); seigema_anw=Kanw1*q+cc1*(1-Ka).*(Kanw1*cos(theta).^2/3-sin(theta).^2)./tan(fai1);%水平土压力 S=trapz(z, seigema_anw);%求曲线面积 seigema_t=S./D;%求平均 sei_t=seigema_t./(gamma2.*D); % 绘图 hold on; grid off; box off; set(gca,'LineWidth',1.5,'FontSize',10,'FontName','Times New Roman'); ylabel('$\sigma_{\mathrm{T}} \, /(\mathrm{kPa})$', 'Interpreter', 'latex', 'FontSize', 14, 'FontName', 'Times New Roman'); xlabel('\itC/D', 'FontSize', 14, 'FontName', 'Times New Roman'); ylim([0 0.18]); plot(C01_D, sei_t, '-o', 'Color', 'b', 'LineWidth', 1.5, 'MarkerFaceColor', 'b', 'DisplayName', '本文解'); legend('Location', 'northeast', 'Orientation', 'vertical', 'Interpreter', 'tex', 'FontSize', 12, 'FontName', 'STSong', 'Box', 'off','NumColumns', 2);

大家在看

recommend-type

IFIX 4.5 MB1 驱动

 MB1:有两个版本,6.x 和 7.x 版,通过串行口连接所有支持 Modbus 串行通讯协议的设备。主要有 Modicon PLC 和其它控制仪表如:Honeywell UDC,UMC,Moore 的控制仪表等。支持 Mobus RTU 和 ASCII 两种通讯协议。当使用其与其它兼容设备通讯时,注意数据类型会与 Modicon 的数据类型有所差别。7.x 版本支持电话拨号连接和无线电连接。
recommend-type

TLSF-All.rar_网络编程_C/C++_

TLSF2.46源代码+相关的英文文献在网站http://rtportal.upv.es/rtmalloc/上可以下载到原代码,但注意下载文件的格式。
recommend-type

思源黑体、简体、中文全套TTF格式

思源黑体、简体、中文全套TTF格式
recommend-type

高频感应加热电源斩波器补偿电路的设计

本文在分析基于功率控制的Buck斩波器的小信号模型和反馈控制模式的基础上,探讨了反馈控制的传递函数和环路参数的设计。对于高频感应加热电源广泛应用的Buck斩波调功电路,设计了双极点、双零点补偿电路,补偿后的系统不仅提高了系统响应速度,而且消除了稳态误差,系统性能明显提高。实验结果证明了这种补偿电路的实用性和有效性,对高频感应加热电源的改进和研究具有很好的参考价值。
recommend-type

XposedDetector

Xposed探测器 预制的静态库,用于检测xposed和清除钩子。 该库基于。 一体化 Gradle: implementation ' io.github.vvb2060.ndk:xposeddetector:2.2 ' 该库是 ,因此您需要在项目中启用它(Android Gradle Plugin 4.1+): android { .. . buildFeatures { .. . prefab true } } 用法 ndk构建 您可以在Android.mk使用xposed_detector 。 例如,如果您的应用程序定义了libapp.so并使用xposed_detector ,则您的Android.mk文件应包括以下内容: include $( CLEAR_VARS ) LOCAL_MODULE

最新推荐

recommend-type

二分法和牛顿迭代法求解方程

在上述实验中,二分法求解方程 `1 + x - exp(x) = 0` 的过程中,经过52次迭代得到了满足误差要求的解。 相比之下,牛顿迭代法是一种迭代求解方法,适用于求解可微函数的根。该方法利用函数在某一点的切线与x轴的...
recommend-type

【电子设计竞赛】2018年电子设计大赛A题失真度分析仪:从理论到代码实现全解析

内容概要:本文深入解析了2018年电子设计大赛A题——失真度分析仪的设计与实现。文章首先介绍了题目的背景与要求,包括谐波计算、数据显示和无线传输三个核心任务。接着详细阐述了解题思路,涵盖信号采集(ADC)、FFT分析、失真度计算、显示与无线传输等方面的技术要点。硬件设计部分重点讲解了信号调理电路、ADC电路、显示电路和无线传输电路的具体实现方法。最后提供了软件代码实现,包括ADC采样、FFT计算、失真度计算、数据显示与无线传输的代码示例。; 适合人群:对电子设计感兴趣的初学者、电子工程专业的学生及有一定基础的电子爱好者。; 使用场景及目标:①帮助读者理解失真度分析仪的工作原理和技术实现;②为准备参加类似电子设计竞赛的人提供参考;③通过实例代码加深对电子电路、信号处理和编程的理解。; 其他说明:本文不仅涵盖了理论知识,还提供了详细的代码实现,有助于读者在实践中学习和掌握相关技能。同时,文中提到的一些优化方向也为进一步探索电子设计提供了思路。
recommend-type

Python打造的Slaee管理系统升级版发布

由于提供的文件信息中,文件名《基于python的slaee管理系统 (15).zip》与描述《基于python的slaee管理系统 (15).zip》相同,并且给出的压缩包文件名称列表中只有一个文件《基于python的slaee管理系统 (14).zip》,该信息表明我们正在讨论两个不同版本的Python系统管理软件的压缩包。以下知识点将根据这些信息详细展开: 知识点一:Python编程语言基础 Python是一种高级编程语言,以其简洁的语法和强大的库支持而闻名。它是解释型语言,具有动态类型系统和垃圾回收功能,适用于多种编程范式,包括面向对象、命令式、函数式和过程式编程。Python广泛应用于系统管理、网络服务器、开发脚本、科学计算、数据挖掘和人工智能等领域。 知识点二:系统管理相关知识 系统管理指的是对计算机系统进行配置、监控和维护的过程,包括硬件资源、软件资源和数据资源的管理。在Python中,系统管理通常涉及操作系统级别的任务,如进程管理、文件系统管理、网络配置、系统日志监控等。Python的系统管理库(例如psutil、fabric、paramiko等)提供了丰富的API来简化这些任务。 知识点三:项目版本控制 从文件名《基于python的slaee管理系统 (14).zip》和《基于python的slaee管理系统 (15).zip》可以看出,这是一个项目在不同版本之间的迭代。版本控制是一种记录一个或多个文件随时间变化的方式,它允许用户可以回到特定版本。在软件开发中,版本控制非常重要,它有助于团队协作、代码合并、分支管理和错误跟踪。常见的版本控制系统包括Git、Subversion (SVN)、Mercurial等。 知识点四:打包与部署 提到“压缩包子文件”,这通常意味着文件已经被压缩打包成一个ZIP文件。在软件开发中,打包是为了便于文件传输、存档保存和分发。在Python项目中,打包也是部署过程的一部分。一个Python项目通常需要包含源代码、依赖关系、配置文件和安装脚本等。打包成ZIP文件后,可以通过各种方式部署到服务器上运行,如使用Fabric或Ansible等自动化部署工具。 知识点五:项目命名及版本命名规则 文件命名中的“基于python的slaee管理系统”表明这是一个与Python语言相关的系统管理项目。而数字“15”和“14”则代表着项目的版本号,这表明项目在持续发展,不同的数字代表了项目在不同时期的迭代。版本号的命名规则通常遵循语义化版本控制(SemVer),这种版本控制系统以 MAJOR.MINOR.PATCH 的形式表示版本号。 知识点六:文件压缩与解压缩技术 ZIP是一种常用的文件压缩格式,它通过减少文件大小来提高存储效率和传输速度。ZIP文件通常是无损压缩,意味着文件在压缩和解压缩的过程中不会丢失信息。Python标准库提供了zipfile模块,允许用户在Python程序中创建ZIP文件、读取ZIP文件内容、提取ZIP文件中的文件等操作。用户可以使用各种图形界面工具(如WinRAR、7-Zip)或命令行工具来处理ZIP文件。 总结以上内容,从文件信息中我们可以得知该内容涉及了Python编程语言、系统管理知识、版本控制、打包与部署、命名规则以及文件压缩技术等多方面的知识点。这些知识点对于理解和应用Python进行系统管理软件开发以及软件的版本迭代、打包与部署均具有重要意义。
recommend-type

深入解析PCB走线传输延时:关键因素与实用公式

# 1. PCB走线传输延时基础 在电子工程领域,尤其是在印刷电路板(PCB)设计中,走线传输延时是一个不可忽视的重要概念。传输延时主要指的是电信号通过PCB上的导电路径从源头传送到目的地所耗费的时间。本章将介绍PCB走线传输延时的基础知识点,为后续章节的深入探讨打下坚实的基础。 首先,了解什么是传输延时是至关重要的。简单来说,它反
recommend-type

gpio很弱是什么意思

<think>嗯,用户的问题是关于GPIO信号弱的概念及其影响。用户似乎对硬件或嵌入式系统有一定了解,但需要更深入的解释。从用户提到的"信号弱"来看,ta可能遇到了实际电路设计中的驱动能力问题,或者在学习GPIO原理时遇到了术语困惑。 用户引用了四篇资料,其中提到GPIO的模拟输入输出模式、施密特触发器的作用、上拉下拉电阻的配置,以及信号线串联电阻的作用。这些内容都与GPIO的驱动能力和信号质量相关。特别是引用[4]中提到的"信号线串联小电阻"和"低频电路不考虑反射",暗示用户可能正在处理实际电路中的信号完整性问题。 用户真正想知道的可能是:为什么我的GPIO输出无法正确驱动某个设备?或者
recommend-type

Python打造的Slaee管理系统升级版发布

标题中的“基于python的slaee管理系统”表明这是一个使用Python编程语言开发的系统。Python是一种广泛使用的高级编程语言,以其易读性和简洁的语法而闻名。SLAEE管理系统可能是指一个特定类型的管理软件,但由于没有给出缩写的完整解释,我们可以假设SLAEE可能是某机构或系统名称的缩写。 从标题和描述来看,存在一处笔误:“基于python的slaee管理系统 (19).zip”和“基于python的slaee管理系统 (18).zip”所指的似乎是同一软件系统,只是版本号不同。根据文件名称列表中的两个文件名,可以推断系统至少有两个版本,一个是版本18,一个是版本19。通常情况下,版本号的增加表示软件进行了更新或改进。 接下来,根据这些信息,我们可以阐述一些相关的知识点: 1. Python编程基础:Python是一种解释型、面向对象、高级编程语言。Python支持多种编程范式,包括过程式、面向对象和函数式编程。Python由于其简洁和易于学习的特性,被广泛应用于网络开发、数据分析、人工智能、机器学习和科学计算等领域。 2. 文件压缩与打包:文件压缩是将文件的大小减小以节省存储空间或网络传输时间的技术。常见的文件压缩格式包括ZIP、RAR、7Z等。文件打包通常指的是将多个文件或文件夹压缩成一个单独的文件。这在数据备份、软件分发和档案管理中非常常见。 3. 版本控制:在软件开发中,“版本”通常指软件的特定状态,版本号则用来标识这些状态。版本控制是一种记录文件、目录或集合随着时间变化的方式,以便将来可以检索特定版本。对于软件项目来说,版本控制是至关重要的,它不仅允许开发者追踪和管理代码的变化,而且还能帮助团队协作,解决冲突,并回滚到旧版本。 4. 软件管理系统的开发:一个软件管理系统可能是针对特定业务领域而设计的,它可能包括用户界面、数据库管理、业务逻辑处理、报告生成和其他许多功能。软件管理系统的开发通常涉及需求分析、系统设计、编程、测试和维护等多个阶段。 5. Python在软件开发中的应用:Python因为具有丰富的库和框架,被广泛用于开发各种类型的软件。例如,Django和Flask是用于Web开发的流行Python框架;而对于数据分析和数据科学任务,Pandas、NumPy和Matplotlib等库提供了强大的数据处理和可视化工具;对于机器学习和人工智能,TensorFlow、PyTorch等库使得复杂算法的实现变得更为简单。 6. 系统更新与维护:随着软件的使用和发展,需求可能会变化,新的问题可能会出现,所以软件系统需要定期进行更新和维护。软件更新可能包括修复已知问题、改进现有功能、增加新功能或优化性能。开发者需要评估是否需要为修复安全漏洞或提高系统性能而更新系统,以及更新之后对用户体验的影响。 由于文件名中只提到了“基于python的slaee管理系统”,没有提供该系统具体功能的详细描述,我们无法提供更加具体的技术知识点。如果需要分析系统的工作原理或具体的技术实现细节,还需要更多的信息。
recommend-type

【Keil-ARM编程艺术】:如何编写可维护且高效的代码

# 摘要 本文旨在为读者提供ARM微控制器编程和Keil开发环境的全面指南。第一章概览了ARM微控制
recommend-type

应用层协议概述

<think>首先,用户的问题是:“我想了解应用层协议的基本概念和常见类型 请问应用层协议简介 常见应用层协议概述”。这翻译成:“I want to understand the basic concepts of application layer protocols and common types. Please introduce application layer protocols and overview common application layer protocols.” 根据系统级指令: - 所有行内数学表达式必须使用$...$格式。 - 独立公式使用$$...$$格式
recommend-type

Delphi 12 TeeChartVCLFMX控件包下载及功能介绍

标题中提到的"Delphi 12 控件之TeeChartVCLFMX-2024.40.rar"指的是Delphi 12版本中使用的TeeChartVCLFMX图表控件的特定版本(2024.40版本)。Delphi是由Embarcadero Technologies开发的一款流行的集成开发环境(IDE),专门用于使用Object Pascal和C++语言开发软件应用程序。该标题强调了Delphi 12环境下TeeChartVCLFMX控件的使用,这表明Delphi的图形用户界面(GUI)组件库中包含了一个专门用于创建复杂图表和图形的组件。 从描述中仅能得到的关于文件的名称是"TeeChartVCLFMX-2024.40.rar",这意味着文件是一个压缩包,具体包含了一个TeeChartVCLFMX的图表控件,版本号为2024.40。它可能包含了在Delphi 12版本中使用该图表控件所需的所有文件,包括库文件、二进制文件、文档等。 标签"delphi 控件"简单而直接地指出了该文件属于Delphi编程环境中的一个控件类别,表明了目标用户是Delphi开发者,他们通常使用这些控件来丰富他们的应用程序界面或增强应用程序的功能。 文件名称列表提供了关于TeeChartVCLFMX压缩包内包含的具体文件及其用途的详细信息: 1. TeeChartVCLFMX-2024.40.exe:这个文件很可能是一个安装程序或可执行文件,用于安装或运行TeeChartVCLFMX图表控件。 2. Keygen.exe:这个文件名表明它可能是一个密钥生成器(Key Generator),用于生成软件的注册码或激活码,使得控件可以脱离试用限制或进行合法授权。 3. Delphi29Binaries-2024.40-windows.pak:这个文件名暗示它包含了特定于Windows平台的Delphi 29(可能指的是Delphi 12的内部版本号)的二进制文件。pak文件是压缩包的一种格式,可能包含了运行TeeChartVCLFMX图表控件所需的库文件、DLLs、组件文件等。 4. TeeChartVCLFMX-2024.40 - D12.pdf:这是一个PDF格式的文件,很可能是用户手册或帮助文档,提供了对TeeChartVCLFMX图表控件版本2024.40在Delphi 12中的使用说明,安装指南,功能介绍或示例代码等。 综合以上信息,可以推断TeeChartVCLFMX-2024.40压缩包是为Delphi 12的开发人员提供了一个专业的图表解决方案,使得用户能够将图表功能集成到他们用Delphi开发的应用程序中。TeeChartVCLFMX可能包含各种图表类型(如条形图、折线图、饼图等),以及丰富的定制选项,如颜色、样式、图例、数据绑定、交互式功能等。开发者可以利用TeeChartVCLFMX提供的图表控件在应用程序中创建强大的数据可视化功能,这对数据分析、科学计算、商业智能、财务报告等领域特别有用。 开发者需要使用Delphi 12 IDE配合提供的组件安装程序或执行文件安装和配置TeeChartVCLFMX控件,通过阅读PDF文档来了解如何使用控件,并在需要时使用Keygen.exe激活控件。Delphi29Binaries-2024.40-windows.pak文件可能包含了控件运行所需的核心二进制组件。通过合理使用这些资源,开发者可以将TeeChartVCLFMX控件集成到自己的项目中,快速构建功能丰富的图表和数据可视化组件。
recommend-type

【Keil-ARM性能优化全解】:代码监控与优化工具的实用技巧

# 摘要 本文对基于Keil-ARM平台的性能优化进行了系统性探讨,涵盖了性能监控工具的介绍、代码优化策略、系统资源管理以及综合案例分析。首先,介绍了Keil-ARM的性能监控工具及其在性能分析中的重要性,包括工具的配置和性能数据解读方法。其次,文中讨论了代码层面的优化,包括高效循环和条件语句的编写,函数内联与尾调用优化,以及编译器优化选项的应用。然后,深入分析了ARM系统资源分配、