在赋值 A(:) = B 中，A 和 B 中的元素数目必须相同。

purpose_857

用matlab求三元一次微分，出现了如下问题，请大神帮忙看下：
! }: Z* O. P/ {4 F, K. H" i问题：在赋值 A(: ) = B 中，A 和 B 中的元素数目必须相同。

出错 longgekuta_lunwen2 (line 41)
4 y1 l  [) F" u: F; N1 @; A    y(i+1) =y(i)+h/6*(K1+2*K2+2*K3+K4);
* [% R# P; F0 I- q# g" u
代码如下：clc;
clear all;
- I+ z0 s+ {, W- d5 P1 u1 iglobal r midu E Es u c q t w i n m1 m2 A B U1 S1 o j %o为弹塑性界面速度（C)与缓冲层弹性波速（Cd）的比值 f为应变值
& u6 L0 `: w5 k8 q% h$ m* Hr=0.2; %落石半径
% j" b" A; E/ k/ L# y) f1 |midu=1640;%密度
: `7 V% j( ?! }* \' h, jE=35e6; %弹性模量
, c( i8 g6 S) c! a  f! ]: dEs=8e6; %压缩模量
u=0.32; %泊松比
. r& m: U  e, X8 |c=12e3; %粘聚力
q=30 ; %内摩擦角
t=sind(q);
w=3*sind(q)/sqrt(3+sind(q)^2); %屈服强度
+ a; k! N- r) U0 Ti=3*c*cosd(q)/sqrt(3+sind(q)^2);%剪切强度

8 l+ m. W9 n9 Bn=3/(3+2*w);
m1=6*w/(3+2*w);
m2=6*i/(3+2*w*Es);
* V" T* m. P/ N
A=6*(1+u)*(1-2*u)*o^2*i/((3+2*w)*(1-o)*E*((1-2*u)*(3-6*w/(3+2*w))*(1+o)-(6*w*o^2*(1+u))/(3+2*w)));
B=-3/2*A;
U1=3*(1-o^2)*A;
2 L% V0 |0 g5 l6 ^0 V0 {0 uS1=-E/(Es*(1+u)*(1-2*u))*((1+u)*A*o+2*(1-2*u)*B/(3*o^2)+2*u*B);

h=j-1;
N =10;
x1=1;  %初始值1
- L/ h( P8 O# E6 @y1=U1; %初始值1
' a4 m& G) o% O% G" K* Kz1=S1; %初始值1
x2=j;  %初始值2
y2=j;  %初始值2
x = ones(1,N);
y = ones(1,N)*0;
$ k8 e( w* j5 G3 x6 W. a- Vz = ones(1,N)*0;

+ s. b6 k- f# r8 z) r" G9 vfor i=1:N
    [K1,L1] = F(1,y(i),z(i))
    [K2,L2] = F((j+1)/2,y(i)+h*K1/2,z(i)+h*L1/2)
    [K3,L3] = F((j+1)/2,y(i)+h*K2/2,z(i)+h*L2/2)
6 c; d7 {- ]: [- @, U    [K4,L4] = F(j,y(i)+h*K3,z(i)+h*L3)

" _  a( @# H& a& g& u    y(i+1) =y(i)+h/6*(K1+2*K2+2*K3+K4);
/ k( ?" x+ {( v; R) H  K+ v    z(i+1)= z(i)+h/6*(L1+2*L2+2*L3+L4);
end

/ ]& K2 G/ V. ^1 Lfigure(1);
2 [" {; m  E* l" v! {comet3(x,y,z,0.1)
) P/ Q$ z( f: W4 F+ S& a' V6 Afunction [K,L] = F(X,U,S)
% e7 ~7 V$ Z( u9 m0 T$ C3 z. \" ~global r midu E Es u c q t w i n m1 m2 A B U1 S1 C   %C为弹塑性界面速度
K = (2*U/X+3*(m1*S+m2)*(X-U)/(X*(n-3*S+2*i/Es)))./((3*n*midu*C^2)*(X-U)^2/(Es*(n-3*S+2*i/Es)^2)-1);
. U# `! p$ C/ m- l- D) y! Q$ v5 qL = ((2*U/X+3*(m1*S+m2)*(X-U)/(X*(n-3*S+2*i/Es)))./((3*n*midu*C^2)*(X-U)^2/(Es*(n-3*S+2*i/Es)^2)-1))*n*midu*C^2*(X-U)/(Es*(n-3*S+2*i/Es))-(m1*S+m2)/X;
end
+ M. [( f) _8 D/ B1 W请大神赐教，感谢!

whatever_

仅供参考，主程序里的j，o，C三个变量未定义，且最后一个变量未在主程序里声明为全局变量

purpose_857

whatever_ 发表于 2023-3-1 11:27
仅供参考，主程序里的j，o，C三个变量未定义，且最后一个变量未在主程序里声明为全局变量

这里 o, C 是未知量，给 j 赋初始值的情况下，这里微分能求出来吗？

peerless2021

只是单纯从代码角度出发，你这里的o, C需要赋值，否则就会导致空集，仅供参考