MATLAB | 两种上色方式的旭日图绘制

2023-10-27 00:01
文章标签 matlab 方式 绘制 两种 旭日

本文主要是介绍MATLAB | 两种上色方式的旭日图绘制，希望对大家解决编程问题提供一定的参考价值，需要的开发者们随着小编来一起学习吧！

嘿，这次真的是好久不见了，好不容易才有点空写点文章，这段时间忙到后台回复都有点来不及看，很抱歉有一部分后台留言刚看到就已经超过时限没法回复了，不过根据大家的留言，需求主要集中在希望出一期旭日图的教程，今天它来啦~

旭日图要说简单也不简单，要说难也不算难，唯一难点估计就是将数据分类排好序，然后每一圈能对应起来呗，上色啥的也不算啥难点，因此这期就简单教大家如何把大框架画出来以及提供两种上色方式。

还是挺酷的，近期没啥空单独开发出一个支持更多上色模式的类，大家可以先根据本文提供的代码先自行DIY着。

教程部分

0 数据

这里懒得搜集数据，自己随机生成了一个table类型数据，前三列都是名称，最后一列是数值：

rng(1)
ULList = 'ABCD';
LLList = 'abcd';rowNum = 50;
idx1   = randi([1,length(ULList)],[1,rowNum]);
idx2   = randi([1,3],[rowNum,1]);
Name1  = ULList(idx1'*ones(1,4));
Name2  = [LLList(idx1'*ones(1,4)),num2str(idx2)];
Name3  = [LLList(idx1)',num2str(idx2),...char(45.*ones(rowNum,1)),char(randi([97,122],[rowNum,5]))];
Value  = rand([rowNum,1]);
Table  = table(Name1,Name2,Name3,Value);

大概长这样：

1 数据处理

利用 grp2idx 进行分类，利用 sortrows 将相同类归在一起

% 利用 grp2idx 进行分类，利用 sortrows 将相同类归在一起
NameList  = Table.Properties.VariableNames;
NameNum   = length(NameList)-1;
NameCell{NameNum} = ' ';
valueList = zeros(length(Table.(NameList{1})),NameNum);
for i = 1:NameNum-1tName = Table.(NameList{i});tUniq = unique(tName,'rows');NameCell{i} = tUniq;ind = grp2idx([tUniq;tName]);ind(1:length(tUniq)) = [];valueList(:,i) = ind;
end
valueList(:,end) = -Table.(NameList{end});
[VAL,IDX] = sortrows(valueList,1:size(valueList,2));
VAL(:,end) = -VAL(:,end);

2 属性预设

设置配色，字体，文本显示的阈值等信息：

% 此处可以设置配色
CList=[0.3882    0.5333    0.70591.0000    0.6824    0.20390.9373    0.4353    0.41570.5490    0.7608    0.79220.3333    0.6784    0.53730.7647    0.7373    0.24710.7333    0.4627    0.57650.7294    0.6275    0.58040.6627    0.7098    0.68240.4627    0.4627    0.4627];
% 在这可修改字体
FontProp = {'FontSize',12,'Color',[0,0,0]};
% 在这可设置比例低于多少的部分不显示文字
TextThreshold = 0.012;

3 绘图

径向渐变

% 开始绘图
figure('Units','normalized','Position',[.2,.1,.52,.72]);
ax = gca; hold on
ax.DataAspectRatio = [1,1,1];
ax.XColor = 'none';
ax.YColor = 'none';
tT = linspace(0,1,100);
for i = 1:size(VAL,2)-1tRateSum = 0;tNum = length(NameCell{i});for j = 1:tNumtRate = sum(VAL(VAL(:,i) == j,end))./sum(VAL(:,end));  tTheta = [tRateSum+tT.*tRate,tRateSum+tRate-tT.*tRate].*pi.*2;tR = [tT.*0+i,tT.*0+i+1];if i == 1fill(cos(tTheta).*tR,sin(tTheta).*tR,CList(j,:),'EdgeColor',[1,1,1],'LineWidth',1)elsetCN = VAL(find(VAL(:,i) == j,1),1);fill(cos(tTheta).*tR,sin(tTheta).*tR,...CList(tCN,:).*0.8^(i-1)+[1,1,1].*(1-0.8^(i-1)),'EdgeColor',[1,1,1],'LineWidth',1)endrotation = (tRateSum+tRate/2)*360;if tRate > TextThresholdif rotation>90&&rotation<270rotation=rotation+180;text(cos((tRateSum+tRate/2).*pi.*2)*i,sin((tRateSum+tRate/2).*pi.*2)*i,NameCell{i}(j,:)+" ",FontProp{:},...'Rotation',rotation,'HorizontalAlignment','right')elsetext(cos((tRateSum+tRate/2).*pi.*2)*i,sin((tRateSum+tRate/2).*pi.*2)*i," "+NameCell{i}(j,:),FontProp{:},...'Rotation',rotation)endendtRateSum = tRateSum+tRate;end
end
% 绘制最外圈饼状图
tRateSum = 0;
tNameCell = Table.(NameList{end-1});
for j = 1:size(VAL,1)tRate = VAL(j,end)./sum(VAL(:,end)); tTheta = [tRateSum+tT.*tRate,tRateSum+tRate-tT.*tRate].*pi.*2;tR = [tT.*0+size(VAL,2),tT.*0+size(VAL,2)+1];tCN = VAL(j,1);fill(cos(tTheta).*tR,sin(tTheta).*tR,CList(tCN,:).*0.8^(size(VAL,2)-1)+...[1,1,1].*(1-0.8^(size(VAL,2)-1)),'EdgeColor',[1,1,1],'LineWidth',1)rotation = (tRateSum+tRate/2)*360;if tRate > TextThresholdif rotation>90&&rotation<270rotation=rotation+180;text(cos((tRateSum+tRate/2).*pi.*2)*size(VAL,2),sin((tRateSum+tRate/2).*pi.*2)*size(VAL,2),tNameCell(IDX(j),:)+" ",FontProp{:},...'Rotation',rotation,'HorizontalAlignment','right')elsetext(cos((tRateSum+tRate/2).*pi.*2)*size(VAL,2),sin((tRateSum+tRate/2).*pi.*2)*size(VAL,2)," "+tNameCell(IDX(j),:),FontProp{:},...'Rotation',rotation)endendtRateSum = tRateSum+tRate;
end

切向渐变

% 开始绘图
figure('Units','normalized','Position',[.2,.1,.52,.72]);
ax = gca; hold on
ax.DataAspectRatio = [1,1,1];
ax.XColor = 'none';
ax.YColor = 'none';
tT = linspace(0,1,100);
LCList = CList(1:length(NameCell{1}),:);
for i = 1:size(VAL,2)-1tRateSum = 0;tNum = length(NameCell{i});NCList = zeros(tNum,3);for j = 1:tNumtRate = sum(VAL(VAL(:,i) == j,end))./sum(VAL(:,end));  tTheta = [tRateSum+tT.*tRate,tRateSum+tRate-tT.*tRate].*pi.*2;tR = [tT.*0+i,tT.*0+i+1];if i == 1fill(cos(tTheta).*tR,sin(tTheta).*tR,CList(j,:),'EdgeColor',[1,1,1],'LineWidth',1)elsetCN = VAL(find(VAL(:,i) == j,1),i-1);tNN = j-VAL(find(VAL(:,i-1) == tCN,1),i)+1;tPN = length(unique(VAL(VAL(:,i-1) == tCN,i)));if mod(i,2)~=0tRN = tNN;elsetRN = tPN+1-tNN;end    NCList(j,:)=LCList(tCN,:).*0.8^(tRN-1)+[1,1,1].*(1-0.8^(tRN-1));fill(cos(tTheta).*tR,sin(tTheta).*tR,NCList(j,:),'EdgeColor',[1,1,1],'LineWidth',1)endrotation = (tRateSum+tRate/2)*360;if tRate > TextThresholdif rotation>90&&rotation<270rotation=rotation+180;text(cos((tRateSum+tRate/2).*pi.*2)*i,sin((tRateSum+tRate/2).*pi.*2)*i,NameCell{i}(j,:)+" ",FontProp{:},...'Rotation',rotation,'HorizontalAlignment','right')elsetext(cos((tRateSum+tRate/2).*pi.*2)*i,sin((tRateSum+tRate/2).*pi.*2)*i," "+NameCell{i}(j,:),FontProp{:},...'Rotation',rotation)endendtRateSum = tRateSum+tRate;endif i ~=1LCList=NCList;end
end
% 绘制最外圈饼状图
tRateSum = 0;
tNameCell = Table.(NameList{end-1});
NCList = zeros(size(VAL,1),3);
for j = 1:size(VAL,1)tRate = VAL(j,end)./sum(VAL(:,end)); tTheta = [tRateSum+tT.*tRate,tRateSum+tRate-tT.*tRate].*pi.*2;tR = [tT.*0+size(VAL,2),tT.*0+size(VAL,2)+1];tCN = VAL(j,size(VAL,2)-1);tNN = j-find(VAL(:,size(VAL,2)-1) == tCN,1)+1;tPN = sum(VAL(:,size(VAL,2)-1) == tCN);if mod(size(VAL,2),2)~=0tRN = tNN;elsetRN = tPN+1-tNN;endNCList(j,:)=LCList(tCN,:).*0.8^(tRN-1)+[1,1,1].*(1-0.8^(tRN-1));fill(cos(tTheta).*tR,sin(tTheta).*tR,NCList(j,:),'EdgeColor',[1,1,1],'LineWidth',1)rotation = (tRateSum+tRate/2)*360;if tRate > TextThresholdif rotation>90&&rotation<270rotation=rotation+180;text(cos((tRateSum+tRate/2).*pi.*2)*size(VAL,2),sin((tRateSum+tRate/2).*pi.*2)*size(VAL,2),tNameCell(IDX(j),:)+" ",FontProp{:},...'Rotation',rotation,'HorizontalAlignment','right')elsetext(cos((tRateSum+tRate/2).*pi.*2)*size(VAL,2),sin((tRateSum+tRate/2).*pi.*2)*size(VAL,2)," "+tNameCell(IDX(j),:),FontProp{:},...'Rotation',rotation)endendtRateSum = tRateSum+tRate;
end

完整代码(径向)

就是前面的代码顺着复制下来，可以换成自己的数据和颜色：
篇幅有限就只先给出径向渐变完整代码，切向渐变代码就光把最后一段稍微一更换即可：

% @author:slandarer%% ========================================================================
% 随机生成一组数据，可将 Table 自行更换
rng(1)
ULList = 'ABCD';
LLList = 'abcd';rowNum = 50;
idx1   = randi([1,length(ULList)],[1,rowNum]);
idx2   = randi([1,3],[rowNum,1]);
Name1  = ULList(idx1'*ones(1,4));
Name2  = [LLList(idx1'*ones(1,4)),num2str(idx2)];
Name3  = [LLList(idx1)',num2str(idx2),...char(45.*ones(rowNum,1)),char(randi([97,122],[rowNum,5]))];
Value  = rand([rowNum,1]);
Table  = table(Name1,Name2,Name3,Value);%% ========================================================================
% 利用 grp2idx 进行分类，利用 sortrows 将相同类归在一起
NameList  = Table.Properties.VariableNames;
NameNum   = length(NameList)-1;
NameCell{NameNum} = ' ';
valueList = zeros(length(Table.(NameList{1})),NameNum);
for i = 1:NameNum-1tName = Table.(NameList{i});tUniq = unique(tName,'rows');NameCell{i} = tUniq;ind = grp2idx([tUniq;tName]);ind(1:length(tUniq)) = [];valueList(:,i) = ind;
end
valueList(:,end) = -Table.(NameList{end});
[VAL,IDX] = sortrows(valueList,1:size(valueList,2));
VAL(:,end) = -VAL(:,end);
%% ========================================================================
% 此处可以设置配色
CList=[0.3882    0.5333    0.70591.0000    0.6824    0.20390.9373    0.4353    0.41570.5490    0.7608    0.79220.3333    0.6784    0.53730.7647    0.7373    0.24710.7333    0.4627    0.57650.7294    0.6275    0.58040.6627    0.7098    0.68240.4627    0.4627    0.4627];
% 在这可修改字体
FontProp = {'FontSize',12,'Color',[0,0,0]};
% 在这可设置比例低于多少的部分不显示文字
TextThreshold = 0.012;
%% ========================================================================
% 开始绘图
figure('Units','normalized','Position',[.2,.1,.52,.72]);
ax = gca; hold on
ax.DataAspectRatio = [1,1,1];
ax.XColor = 'none';
ax.YColor = 'none';
tT = linspace(0,1,100);
for i = 1:size(VAL,2)-1tRateSum = 0;tNum = length(NameCell{i});for j = 1:tNumtRate = sum(VAL(VAL(:,i) == j,end))./sum(VAL(:,end));  tTheta = [tRateSum+tT.*tRate,tRateSum+tRate-tT.*tRate].*pi.*2;tR = [tT.*0+i,tT.*0+i+1];if i == 1fill(cos(tTheta).*tR,sin(tTheta).*tR,CList(j,:),'EdgeColor',[1,1,1],'LineWidth',1)elsetCN = VAL(find(VAL(:,i) == j,1),1);fill(cos(tTheta).*tR,sin(tTheta).*tR,...CList(tCN,:).*0.8^(i-1)+[1,1,1].*(1-0.8^(i-1)),'EdgeColor',[1,1,1],'LineWidth',1)endrotation = (tRateSum+tRate/2)*360;if tRate > TextThresholdif rotation>90&&rotation<270rotation=rotation+180;text(cos((tRateSum+tRate/2).*pi.*2)*i,sin((tRateSum+tRate/2).*pi.*2)*i,NameCell{i}(j,:)+" ",FontProp{:},...'Rotation',rotation,'HorizontalAlignment','right')elsetext(cos((tRateSum+tRate/2).*pi.*2)*i,sin((tRateSum+tRate/2).*pi.*2)*i," "+NameCell{i}(j,:),FontProp{:},...'Rotation',rotation)endendtRateSum = tRateSum+tRate;end
end
% 绘制最外圈饼状图
tRateSum = 0;
tNameCell = Table.(NameList{end-1});
for j = 1:size(VAL,1)tRate = VAL(j,end)./sum(VAL(:,end)); tTheta = [tRateSum+tT.*tRate,tRateSum+tRate-tT.*tRate].*pi.*2;tR = [tT.*0+size(VAL,2),tT.*0+size(VAL,2)+1];tCN = VAL(j,1);fill(cos(tTheta).*tR,sin(tTheta).*tR,CList(tCN,:).*0.8^(size(VAL,2)-1)+...[1,1,1].*(1-0.8^(size(VAL,2)-1)),'EdgeColor',[1,1,1],'LineWidth',1)rotation = (tRateSum+tRate/2)*360;if tRate > TextThresholdif rotation>90&&rotation<270rotation=rotation+180;text(cos((tRateSum+tRate/2).*pi.*2)*size(VAL,2),sin((tRateSum+tRate/2).*pi.*2)*size(VAL,2),tNameCell(IDX(j),:)+" ",FontProp{:},...'Rotation',rotation,'HorizontalAlignment','right')elsetext(cos((tRateSum+tRate/2).*pi.*2)*size(VAL,2),sin((tRateSum+tRate/2).*pi.*2)*size(VAL,2)," "+tNameCell(IDX(j),:),FontProp{:},...'Rotation',rotation)endendtRateSum = tRateSum+tRate;
end

完

以上以及是完整代码，若日后代码有更新可在以下gitee仓库查看：

https://gitee.com/slandarer/spdraw/

这篇关于MATLAB | 两种上色方式的旭日图绘制的文章就介绍到这儿，希望我们推荐的文章对编程师们有所帮助！


http://www.chinasem.cn/article/285844。

相关文章

Windows 上如果忘记了 MySQL 密码 重置密码的两种方法

Windows 上如果忘记了 MySQL 密码 重置密码的两种方法

《Windows上如果忘记了MySQL密码重置密码的两种方法》：本文主要介绍Windows上如果忘记了MySQL密码重置密码的两种方法,本文通过两种方法结合实例代码给大家介绍的非常详细,感... 目录方法 1：以跳过权限验证模式启动 mysql 并重置密码方法 2：使用 my.ini 文件的临时配置在 Wi
阅读更多...
Spring Boot读取配置文件的五种方式小结

Spring Boot读取配置文件的五种方式小结

《SpringBoot读取配置文件的五种方式小结》SpringBoot提供了灵活多样的方式来读取配置文件,这篇文章为大家介绍了5种常见的读取方式,文中的示例代码简洁易懂,大家可以根据自己的需要进... 目录1. 配置文件位置与加载顺序2. 读取配置文件的方式汇总方式一：使用 @Value 注解读取配置方式二
阅读更多...
JAVA保证HashMap线程安全的几种方式

JAVA保证HashMap线程安全的几种方式

《JAVA保证HashMap线程安全的几种方式》HashMap是线程不安全的,这意味着如果多个线程并发地访问和修改同一个HashMap实例,可能会导致数据不一致和其他线程安全问题,本文主要介绍了JAV... 目录1. 使用 Collections.synchronizedMap2. 使用 Concurren
阅读更多...
C# foreach 循环中获取索引的实现方式

C# foreach 循环中获取索引的实现方式

《C#foreach循环中获取索引的实现方式》：本文主要介绍C#foreach循环中获取索引的实现方式,本文给大家介绍的非常详细,对大家的学习或工作具有一定的参考借鉴价值,需要的朋友参考下吧... 目录一、手动维护索引变量二、LINQ Select + 元组解构三、扩展方法封装索引四、使用 for 循环替代
阅读更多...
将Java程序打包成EXE文件的实现方式

将Java程序打包成EXE文件的实现方式

《将Java程序打包成EXE文件的实现方式》：本文主要介绍将Java程序打包成EXE文件的实现方式,具有很好的参考价值,希望对大家有所帮助,如有错误或未考虑完全的地方,望不吝赐教... 目录如何将Java程序编程打包成EXE文件1.准备Java程序2.生成JAR包3.选择并安装打包工具4.配置Launch4
阅读更多...
springboot上传zip包并解压至服务器nginx目录方式

springboot上传zip包并解压至服务器nginx目录方式

《springboot上传zip包并解压至服务器nginx目录方式》：本文主要介绍springboot上传zip包并解压至服务器nginx目录方式,具有很好的参考价值,希望对大家有所帮助,如有错误... 目录springboot上传zip包并解压至服务器nginx目录1.首先需要引入zip相关jar包2.然
阅读更多...
Java数组初始化的五种方式

Java数组初始化的五种方式

《Java数组初始化的五种方式》数组是Java中最基础且常用的数据结构之一,其初始化方式多样且各具特点,本文详细讲解Java数组初始化的五种方式,分析其适用场景、优劣势对比及注意事项,帮助避免常见陷阱... 目录1. 静态初始化：简洁但固定代码示例核心特点适用场景注意事项2. 动态初始化：灵活但需手动管理代
阅读更多...
python logging模块详解及其日志定时清理方式

python logging模块详解及其日志定时清理方式

《pythonlogging模块详解及其日志定时清理方式》：本文主要介绍pythonlogging模块详解及其日志定时清理方式,具有很好的参考价值,希望对大家有所帮助,如有错误或未考虑完全的地... 目录python logging模块及日志定时清理1.创建logger对象2.logging.basicCo
阅读更多...
C#TextBox设置提示文本方式(SetHintText)

C#TextBox设置提示文本方式(SetHintText)

《C#TextBox设置提示文本方式(SetHintText)》：本文主要介绍C#TextBox设置提示文本方式(SetHintText),具有很好的参考价值,希望对大家有所帮助,如有错误或未考虑... 目录C#TextBox设置提示文本效果展示核心代码总结C#TextBox设置提示文本效果展示核心代
阅读更多...
SpringValidation数据校验之约束注解与分组校验方式

SpringValidation数据校验之约束注解与分组校验方式

《SpringValidation数据校验之约束注解与分组校验方式》本文将深入探讨SpringValidation的核心功能,帮助开发者掌握约束注解的使用技巧和分组校验的高级应用,从而构建更加健壮和可... 目录引言一、Spring Validation基础架构1.1 jsR-380标准与Spring整合1
阅读更多...

Copyright China编程 23002807@qq.com

沪ICP备2023033072号-2