0

我正在尝试从这个链接实现一些东西-

http://blogs.mathworks.com/pick/2008/05/27/advanced-matlab-capture-mouse-movement/

在更复杂的 gui 中.. 我绘制了一条曲线，并使用寻峰器功能找到了图中的所有最大值，并用 X 标记它们（使用另一个绘图功能）但我希望用户有能力如果它们是错误的，则纠正最大值的位置，或者如果它们是不必要的，则删除一些 X。

我不明白我应该更改或添加什么以使其每一步仅拖动某个 X。

在这段代码中它不是一个 gui，但我仍然有同样的问题

我的代码-

function main

global data_file

x=0:0.1:100
data_file=sin(x)*5+(rand(100*10+1,1)’-0.5)

starting_sample= 1;
sampling_rate=1;

len = length(data_file);

f = figure('NumberTitle','off','color','w','Menubar','none');

[picks1,locs1] = findpeaks(data_file(starting_sample:sampling_rate:len),'MINPEAKDISTANCE',10);
a = axes('xlim',[0 100], 'ylim',[-5 5]);

plot( 1:sampling_rate:len, data_file( starting_sample:sampling_rate:len ) );
hold on
p=plot(locs1,picks1,'x','linewidth',2,'color','r','ButtonDownFcn',@start_drag1);
hold off

set(f,'WindowButtonUpFcn',@stop_drag1)

    function start_drag1(varargin)
        set(f,'WindowButtonMotionFcn',@draging)
    end

    function draging(varargin)
        pt= get(a,'currentpoint')
        set(p,'XData',pt(1)*[1 1])
    end

    function stop_drag1(varargin)
        set(f,'WindowButtonMotionFcn','')
    end
end
4

1 回答 1

0

如果要指定可以拖动的最小/最大步长，则需要编辑函数以在超过某些拖动阈值后draging增量更新。XData

像这样的东西可能会起作用

function draging(varargin)

   dragDist = 1;
   pt = get(a,'currentpoint')
   curX = get(p,'XData')

   if ( curX(1) - pt(1) > dragDist) %drag to the left
      set(p,'XData',curX - dragDist)
   elseif (pt(1) - curX(1) > dragDist) % drag to the right
      set(p, 'XData', curX + dragDist)
   end

end
于 2012-11-07T19:34:08.773 回答