MATLAB｜散点图｜边际直方图

硬件电子工程师

点击上方蓝字和“好玩的MATLAB”一起快乐玩耍吧！
  t5 r1 @) V. y3 V! J9 l* B2 `3 l

xomcy0sbmwz64017654904.jpg

( B( R2 a' L7 R  j$ k4 t+ n好玩的matlab
带你解锁不一样的matlab新玩法
! q0 j( P8 F1 d9 o, e
7 Q  u7 R; J9 W8 Y+ d8 |- T前面几篇推文详细的介绍了散点图和边际图的画法【MATLAB｜回归曲线｜置信区间｜边际图｜核密度填充图、MATLAB｜聚类散点图｜边际图｜核密度填充图】，今天特意添加边际直方图的画法，喜欢此推文的小伙伴们记得点赞+关注+分享！【尊重作者劳动成果，转载请注明推文链接和公众号名】
效果效果图图
; P6 ?' S& m0 t" w边际直方图效果图

prbwcnz0duo64017655004.png

3 u. u8 i) l: ~6 z+ ^

cdzhruvtqrc64017655104.gif

, U$ l- ^9 b, m8 M绘图工具函数

classdef PlotDensHist    %--------------------------------------------------------------------------    % @Author: 好玩的Matlab    % @公众号：好玩的Matlab    % @Created: 09,06,2023    % @Email:2377389590@qq.com    % 尊重劳动成果，转载请备注推文链接和公众号名。    % @Disclaimer: This code is provided as-is without any warranty.    %--------------------------------------------------------------------------    properties        XData;       % x数据        YData;       % y数据        FillColor;   % 填充颜色        FaceAlpha;   % 透明度数        HFig;        % 图形句柄    end    methods        function obj  = PlotDensHist(sHdl)            % 设置默认参数            obj.XData = get(sHdl, 'XData');            obj.YData = get(sHdl, 'YData');            obj.FillColor = get(sHdl, 'CData');            obj.FaceAlpha = get(sHdl, 'MarkerFaceAlpha') * 0.4;
" d( a4 n" B6 k" R4 N            obj.HFig = gcf;        end        function plotDensHist(obj)            hFig = obj.HFig;  % 获取当前figure的句柄            axesPositions = {[0.07, 0.07, 0.65, 0.65],...   % 主图                [0.07, 0.07, 0.65, 0.65],...               % 与主图重合                [0.07, 0.74, 0.65, 0.2],...                % 顶部区域                [0.74, 0.07, 0.2, 0.65]};                 % 右侧区域            axObj = findall(hFig, 'Type', 'axes');            hFig.Position = [439 76 891 790];            axesCount = length(axObj);            if axesCount == 1                ax = gca;                ax.Box = 'on';                ax.Position = axesPositions{1};                topAxes = axes('position', axesPositions{3});                rightAxes = axes('position', axesPositions{4});            end            % 遍历所有 Axes 对象            for i = 1:length(axObj)                ax = axObj(i);  % 获取当前 Axes 对象                pos = get(ax, 'Position');  % 获取当前 Axes 对象的 Position 属性
1 [& u2 u( @6 E                % 检查 Position 是否匹配                if sum(abs(pos - axesPositions{1})) 1e-6                    mainAxes = ax;                elseif  sum(abs(pos - axesPositions{3})) 1e-6                    topAxes = ax;                elseif sum(abs(pos - axesPositions{4})) 1e-6                    rightAxes = ax;                end            end            xi = obj.XData;            yi = obj.YData;            nbins = round(length(xi) / 4);            % 这里绘制到topAxes            if ~isempty(topAxes)                axes(topAxes);                hold on;                histogram(topAxes, xi, nbins, 'FaceColor', obj.FillColor, ...                    'EdgeColor', obj.FillColor, 'FaceAlpha', obj.FaceAlpha, 'LineWidth', 0.5)                topAxes.YDir = 'normal';                topAxes.XMinorTick = 'on';                topAxes.YMinorTick = 'on';                topAxes.TickDir = 'out';                topAxes.TickLength = [.011 .01];                topAxes.XTickLabel = {};                topAxes.Visible = 'on';                topAxes.Box = 'off';                topAxes.LineWidth = 1.2;                topAxes.FontSize = 18;                topAxes.FontName = 'Times New Roman';                topAxes.XLim = ax.XLim;                topAxes.Box = 'off';            end
5 @- j# v# T8 u6 C, M            % 这里绘制到rightAxes            if ~isempty(rightAxes)                axes(rightAxes);                hold on;                histogram(rightAxes, yi, nbins, 'FaceColor', obj.FillColor, 'Orientation', 'horizontal', ...                    'EdgeColor', obj.FillColor, 'FaceAlpha', obj.FaceAlpha, 'LineWidth', 0.5)                rightAxes.YDir = 'normal';                rightAxes.XMinorTick = 'on';                rightAxes.YMinorTick = 'on';                rightAxes.TickDir = 'out';                rightAxes.TickLength = [.011 .01];                rightAxes.YTickLabel = {};                rightAxes.Visible = 'on';                rightAxes.Box = 'off';                rightAxes.LineWidth = 1.2;                rightAxes.FontSize = 18;                rightAxes.FontName = 'Times New Roman';                rightAxes.XLim = topAxes.YLim;                rightAxes.YLim = ax.YLim;                rightAxes.Box = 'off';            end            % 绑定X Y            linkaxes([mainAxes, rightAxes], 'y')            linkaxes([mainAxes, topAxes], 'x')        end    endend这个函数定义了PlotDensHist的MATLAB类，用于创建一个带有附加边际分布信息的直方图图形。以下是对该函数的分析和介绍：类属性：
4 A& B, C4 p2 YXData：存储主图中的X轴数据。
5 F2 F2 c, |+ {: xYData：存储主图中的Y轴数据。
FillColor：存储直方图的填充颜色。
$ Y  ~, g% }3 V) z) @0 oFaceAlpha：存储填充区域的透明度。
- T, u  e6 ~8 m2 g, s; l" h) b9 JHFig：存储图形句柄。
/ h/ F6 v4 x- v" Y/ ]

orqcsmntx0z64017655205.png

根据句柄的形式调用。
- S2 v- R% ]- u  H, n构造函数 PlotDensHist(sHdl)：
) `* l" b: Y$ l该构造函数接受一个图形句柄 sHdl 作为输入参数，并从该图形句柄中提取相关属性值，以初始化对象的属性。这些属性包括X轴数据、Y轴数据、填充颜色、线条颜色等。
$ h& `( }3 w2 c) A" n+ o& T构造函数将这些属性存储在对象的属性中，并设置默认的绘图参数。
plotDensHist 方法：
, w( ?8 l9 e) j8 p, B& RplotDensHist 方法用于在MATLAB图形中创建直方图，并添加附加的边际分布信息。
该方法首先获取当前图形的句柄 hFig，然后创建主图、顶部区域和右侧区域的坐标轴位置。
主图的数据来自对象的属性 XData 和 YData，并根据对象的其他属性（如填充颜色、线条颜色等）来绘制直方图。
- {; r* ~# p; O' v, f顶部和右侧区域分别用于绘制边际分布的直方图，使用的数据分别是 XData 和 YData。
+ |0 s) T' l  l* Y, T9 \方法还设置了坐标轴的各种属性，如刻度线样式、字体大小等。
最后，通过 linkaxes 方法将主图和边际分布区域的坐标轴连接在一起，以确保它们在缩放时保持一致。
[/ol]案例

clc;clear;close all;d1=repmat([2 2],100,1) + randn(100,2)*[1 .5; 0 1.32];d2=repmat([9 1],100,1) + randn(100,2)*[1.4 0.2; 0 0.98];d3=repmat([6 8],100,1) + randn(100,2)*[1 0.5; 0 1];
% 使用scatter函数绘制散点图hold onsh1=scatter(d1(:,1), d1(:,2),'filled','CData',[0,0,1],'MarkerFaceAlpha',0.5,'MarkerEdgeColor','none','Marker','o');sh2=scatter(d2(:,1), d2(:,2),'filled','CData',[0,1,0],'MarkerFaceAlpha',0.5,'MarkerEdgeColor','none','Marker','^');sh3=scatter(d3(:,1), d3(:,2),'filled','CData',[1,0.6471,0],'MarkerFaceAlpha',0.5,'MarkerEdgeColor','none','Marker','s');
% 画出凸包k1 = convhull(d1(:,1), d1(:,2));k2 = convhull(d2(:,1), d2(:,2));k3 = convhull(d3(:,1), d3(:,2));line(d1(k1,1), d1(k1,2), 'Color', [0 0 1],'LineWidth',1.2)line(d2(k2,1), d2(k2,2), 'Color', [0,1,0],'LineWidth',1.2)line(d3(k3,1), d3(k3,2), 'Color', [1,0.6471,0],'LineWidth',1.2)legend('demo1','demo2','demo3','box','off','Location','best')% 设置标签和标题ax=gca;box onax.XLim=[-2,15];ax.YLim=[-4,13];ax.XLabel.String='X';ax.YLabel.String='Y';ax.Title.String='';
  A7 H9 `- C/ a) |. h' c3 wax.GridLineStyle = '-.'; % 设置网格线样式为虚线ax.GridColor = 'k'; % 设置网格线颜色为红色ax.XGrid = 'off'; % 关闭X网格线ax.YGrid = 'off';  % 打开Y网格线
4 k2 ~5 u0 ~" {" [. R. V' Y" E7 `ax.LineWidth = 1;            % 设置坐标线宽ax.XMinorTick = 'on';        % 打开x次要刻度线ax.YMinorTick = 'on';        % 打开y次要刻度线ax.TickDir = 'out';           % 设置刻度线方向向外ax.FontSize = 14;            % 设置坐标字体大小
0 W: G! M! |* LPhdl1=PlotDensHist(sh1);Phdl1.plotDensHist();Phdl2=PlotDensHist(sh2);Phdl2.plotDensHist();Phdl3=PlotDensHist(sh3);Phdl3.plotDensHist();

p4yxmtzg2vi64017655305.png

- -THE END- -
! w) K8 V) }2 c0 L源码下载：gitee下载：https://gitee.com/iDMatlab/cool-scatter-chart
+ s4 ?, S/ u) n7 q  ]- c# ~

p0x1jgej2ib64017655405.png

. z* ^' x5 H% A! z5 |! Y参考资料：
/ @& a$ i6 L, p+ p2 R) [! c5 L; \$ S【1】MATLAB|炫酷的聚类散点图【2】MATLAB｜聚类散点图｜边际图｜核密度填充图【3】MATLAB｜回归曲线｜置信区间｜边际图｜核密度填充图

fgc5hpp1a0g64017655505.gif

nq0iipvpeeo64017655605.png

送书活动
0 K, C8 ]/ m1 u% ^! S0 v

cnpelutgnqx64017655705.png

4wmhpghf5ce64017655805.gif

. i6 K" |1 p( Q4 m9 Y; Y: H& [
2 v7 B4 B3 p* U( s0 M4 u包邮赠送 「北京大学出版社」赞助《MATLAB科学计算从入门到精通》
本书从 MATLAB 基础语法讲起，介绍了基于 MATLAB 函数的科学计算问题求解方法，实现了大量科学计算算法。
8 K" ^  `8 J6 L+ a. w" x) C) [% H本书分为三大部分。第 1 章和第 2 章为 MATLAB 的基础知识，对全书用到的 MATLAB 基础进行了简单介绍。第 3 ~ 12 章为本书的核心部分，包括线性方程组求解、非线性方程求解、数值优化、数据插值、数据拟合与回归分析、数值积分、常微分方程求解、偏微分方程求解、概率统计计算及图像处理与信号处理等内容。第 13 ~ 15 章为实战部分，以实际生活中的数学问题为例，将前文介绍的各类科学计算算法应用其中。本书内容全面、通俗易懂，适合有一定 MATLAB 基础、想要进行进阶学习的读者。
了解更多
$ y* N6 J  r2 m  J# p5 O- j▼▼▼
( G1 h& L4 K4 u: H( H

nfn5hpiquaa64017655905.jpg

6 r+ o7 b' U% v% o! ]
【抽奖方式及满足条件】：
3 @. ~6 W6 j1 P6 N1.关注「好玩的MATLAB 」公众号和视频号
; H" T$ c4 U! G/ G8 y) a+ [

hmqqnfw0ufa64017656005.jpg

2.给本文点【赞】+【在看】；
3.留言区评论点赞最多的前3名。
+ d  V! q& X, x* I, C4.本活动只针对从未获过奖的同学，之前获过奖的小伙伴，不用参加。
同时满足上述4个条件的读者朋友，包邮赠送一本
【开奖时间】：2023年10月10日夜晚8点
. @5 F& A9 G& |) E7 P# s【领奖方式】：在开奖时加小编私人微信：idmatlab
扫一扫加管理员微信

x1yzpr54cci64017656105.png

4 s8 P2 ^  W4 u+ C" x6 \0 K

l0lsazkn5xv64017656205.jpg