日本免费高清视频-国产福利视频导航-黄色在线播放国产-天天操天天操天天操天天操|www.shdianci.com

學(xué)無先后，達者為師

網(wǎng)站首頁 編程語言 正文

Matlab實現(xiàn)多子圖同步調(diào)整視角_C 語言

作者：slandarer ? 更新時間： 2022-05-18 編程語言

要解決的問題：我希望在旋轉(zhuǎn)其中一個AXES的視角的同時，其他AXES跟著以相同視角旋轉(zhuǎn)。

我曾經(jīng)在出過一篇如何同步視角的文章，但是只是講清楚了原理，并寫出了編寫方法，但每次要寫都要編寫代碼屬實麻煩，因此，我將主要部分封裝成了函數(shù)，用的時候只需要在代碼結(jié)尾加上一行引用一下函數(shù)就行?。?/p>

在這里插入圖片描述

以下先講解函數(shù)咋用，在最后給出函數(shù)完整代碼：

DEMO1 同時改變坐標(biāo)范圍和視角

直接在代碼最后面引用一下工具函數(shù)，加入一行：

SCR()

在調(diào)整某一坐標(biāo)區(qū)域即可實現(xiàn)同時調(diào)整坐標(biāo)范圍和視角，實例代碼如下：

% demo1.m
% @author: slandarer

[X,Y]=meshgrid(1:0.5:10,1:20);
Z=sin(X)+cos(Y);

% 坐標(biāo)區(qū)域1繪圖
subplot(1,2,1)
surf(X,Y,Z)
colormap(gca,summer)

% 坐標(biāo)區(qū)域2繪圖
subplot(1,2,2)
surf(X,Y,Z)
colormap(gca,winter)

% 應(yīng)用坐標(biāo)區(qū)域同步旋轉(zhuǎn)函數(shù)
SCR()

在這里插入圖片描述

DEMO2 只同時改變視角

因為有時候繪圖的坐標(biāo)范圍著實不一樣，想要只改變視角但是不改變坐標(biāo)范圍可以在最后加入：

SCR(‘ucLim’)

% demo2.m
% @author: slandarer

[X,Y]=meshgrid(1:0.5:10,1:20);
Z=sin(X)+cos(Y);

% 坐標(biāo)區(qū)域1繪圖
subplot(1,2,1)
surf(X,Y,Z)
colormap(gca,summer)

% 坐標(biāo)區(qū)域2繪圖
subplot(1,2,2)
surf(peaks)
colormap(gca,winter)

% 應(yīng)用坐標(biāo)區(qū)域同步旋轉(zhuǎn)函數(shù)
% 只改變視角不改變軸范圍
SCR('ucLim')

在這里插入圖片描述

DEMO3 更多子圖

不管多少子圖后面那一行照常加就完事，是不是嘎嘎好用：

% demo3.m
% @author: slandarer

% 繪制6個圖
M=2;
N=3;

for m=1:M
    for n=1:N
        subplot(M,N,n+(m-1)*N)
        hold on;grid on
        scatter3(rand([5,1]),rand([5,1]),rand([5,1]),'filled')
    end
end

% 應(yīng)用坐標(biāo)區(qū)域同步旋轉(zhuǎn)函數(shù)
% 只改變視角不改變軸范圍
SCR('ucLim')

工具函數(shù)完整代碼

function SCR(varargin)
%
% @author: slandarer
% @公眾號: slandarer隨筆
% @知乎  : hikari
% @CSDN  : slandarer
% 
% 期待您的關(guān)注!!!

help SCR % 若不希望輸出[作者信息],請刪除這行

uchangeLim=false;
if nargin>0
    if ischar(varargin{1})&&strcmp(varargin{1},'ucLim')
        uchangeLim=true;fig=gcf;
    elseif strcmp(get(varargin{1},'type'),'figure' )
        fig=varargin{1};
    end
else
    fig=gcf;
end
if nargin>1&&ischar(varargin{1})&&strcmp(varargin{1},'ucLim')
    uchangeLim=true;
end

% 為axes編號
ch=fig.Children;
for i=1:length(ch)
    ch(i).UserData=i;
end
fig.CurrentAxes=ch(end);

isClicking=false;
set(fig,'WindowButtonDownFcn',@bt_down);  % 設(shè)置鼠標(biāo)按下回調(diào)
set(fig,'WindowButtonUpFcn',@bt_up);      % 設(shè)置鼠標(biāo)松開回調(diào)
set(fig,'WindowButtonMotionFcn',@bt_move);% 設(shè)置鼠標(biāo)移動回調(diào)

function bt_down(~,~),isClicking=true;end % 鼠標(biāo)按下回調(diào)
function bt_up(~,~),isClicking=false;end  % 鼠標(biāo)松開回調(diào)
function bt_move(~,~)
    if isClicking
        tempAxes=fig.CurrentAxes; % 獲取當(dāng)前點擊的axes
        tempAxes.UserData;
        for ii=1:length(ch) % 兩個axes
            if ch(ii).UserData~=tempAxes.UserData
                ch(ii).View=tempAxes.View; % 讓其他axes與被點擊axes有相同視角
                if ~uchangeLim
                    ch(ii).XLim=tempAxes.XLim; % 有相同X軸坐標(biāo)范圍
                    ch(ii).YLim=tempAxes.YLim; % 有相同Y軸坐標(biāo)范圍
                    ch(ii).ZLim=tempAxes.ZLim; % 有相同Z軸坐標(biāo)范圍
                end
            end
        end
    end
end
end

原文鏈接：https://blog.csdn.net/slandarer/article/details/123513916

欄目分類
最近更新