如何以一个数为中心，产生一个等间距的序列？

re-us

问题：如何以一个数为中心，产生一个等间距的序列？

比如： 以1中心产生如下的序列 -1 0 1 2 3; 当然，如果只产生四个数，则 -1 0 1 2和0 1 2 3都可以

下面是代码:(当n＝5时产生-1 0 1 2 3，当n＝4时产生0 1 2 3）
clc; clear
n=5; m=1;
p=zeros(1,n); j=round(n/2); p(j)=m;
for i=1:j-1, p(j-i)=m-i; end
for i=1:n-j, p(i+j)=m+i; end

但是觉得程序太复杂了，有没有函数可以调用？谢谢

[ 本帖最后由 ChaChing 于 2010-2-3 13:56 编辑 ]

eight

暂时想不到有什么函数直接调用，不过可以用冒号运算符来做（以下仅n为奇数时成立）：

1. 
   
2. clc; clear
   
3. n=5; m=1;
   
4. d=(n-1)/2;
   
5. p=(m-d):(m+d);
   

复制代码

[ 本帖最后由 ChaChing 于 2010-2-3 13:55 编辑 ]

eight

写了个小程序，可以完整解决你的问题：

1. 
   
2. function y = myEquispace(x,n,d)
   
3. % x -- data origin
   
4. % n -- number of output(i.e. length of y)
   
5. % d -- step between two consecutive elements
   
6. 
   
7. m = floor(n/2);
   
8. a = filter(1,[1,-1],[x,d*ones(1,m)]);
   
9. b = filter(1,[1,-1],[x,-d*ones(1,m)]);
   
10. y = [b(end:-1:2),a];
    
11. if mod(n,2) == 0
    
12.     y = y(2:end);
    
13. end

复制代码

当然了，中间两句 filter 可以使用冒号运算符代替（类似2楼的做法）

[ 本帖最后由 eight 于 2008-2-26 13:11 编辑 ]

re-us

非常感谢。学习了

怎么搞的，论坛还有什么衰神呀。:lol

[ 本帖最后由 ChaChing 于 2010-2-3 13:58 编辑 ]

yulong_02

可以用这个函数的嘛linspace(a,b,c )
linspace(-1,3,5)

ans =

    -1     0     1     2     3