cjd502 发表于 2008-5-31 22:21

一个小东西把我绕住了,关于数组的问题

一个小程序:目的是找接近的公差,我年40了,没编程基础,烦请师弟帮看一下
第一步:输入数组:x1 x2 x3------xn
第二步:求任意两个数间的差y(k)=x(j)-x(i)   j=2:n   i=1:n
第三步:比较所得的差y(k),一共有j个,把差的绝对值小于1(或某个数m)的所有差列出。

[ 本帖最后由 sigma665 于 2008-6-1 09:18 编辑 ]

ch_j1985 发表于 2008-5-31 22:49

原帖由 cjd502 于 2008-5-31 22:21 发表 http://www.chinavib.com/forum/images/common/back.gif
一个小程序:目的是找接近的公差,我年40了,没编程基础,烦请师弟帮看一下
第一步:输入数组:x1 x2 x3------xn
第二步:求任意两个数间的差y(k)=x(j)-x(i)   j=2:n   i=1:n
第三步:比较所得的差y(k), ...

看看下面的代码是不是您想要的:

clc
clear
X=input('输入数组X:\n');
k=length(X);
n=0;
for i=1:k-1
    for j=i+1:k
      n=n+1;
      Y1(n)=X(i)-X(j);%求差
    end
end
Y2=abs(Y1);%求差的绝对值
Z=find(Y2<2);
Y1(Z)

cjd502 发表于 2008-6-1 18:15

学习了,找资料验证了一下,确实很完整。多谢指教。
页: [1]
查看完整版本: 一个小东西把我绕住了,关于数组的问题