BiomedEngX/CircosHeatmap-aardio
2
1
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases 3 Wiki Activity

add 更新 R 脚本，调整列名字体大小，优化热图可读性

Browse Source
This commit is contained in:
freefire 2025-01-13 21:41:41 +08:00
parent 86290ea648
commit d4abd21a09
7 changed files with 8 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
README.md
View File

@ -1,5 +1,5 @@
<p align="center"> <p align="center">
<img src="./res/result.jpg" width="200" /> <img src="./res/result.png" width="200" />
</p> </p>
<h1 align="center"> <h1 align="center">
<img src="./res/app.png" width="30" style="vertical-align: middle;" /> <img src="./res/app.png" width="30" style="vertical-align: middle;" />

2
README_EN.md
View File

@ -1,5 +1,5 @@
<p align="center"> <p align="center">
<img src="./res/result.jpg" width="200" /> <img src="./res/result.png" width="200" />
</p> </p>
<h1 align="center"> <h1 align="center">
<img src="./res/app.png" width="30" style="vertical-align: middle;" /> <img src="./res/app.png" width="30" style="vertical-align: middle;" />

7
default.aproj
View File

@ -1,11 +1,12 @@
<?xml version="1.0" encoding="utf-8"?> <?xml version="1.0" encoding="utf-8"?>
<project ver="10" name="CircosHeatmap-aardio" libEmbed="true" icon="res\app.ico" ui="win" output="CircosHeatmap-aardio.exe" CompanyName="" FileDescription="CircosHeatmap-aardio" LegalCopyright="Copyright (C) freefire 2025" ProductName="CircosHeatmap-aardio" InternalName="CircosHeatmap-aardio" FileVersion="0.0.0.21" ProductVersion="0.0.0.21" publishDir="/dist/" dstrip="true" local="false" ignored="false"> <project ver="10" name="CircosHeatmap-aardio" libEmbed="true" icon="res\app.ico" ui="win" output="CircosHeatmap-aardio.exe" CompanyName="" FileDescription="CircosHeatmap-aardio" LegalCopyright="Copyright (C) freefire 2025" ProductName="CircosHeatmap-aardio" InternalName="CircosHeatmap-aardio" FileVersion="0.0.0.22" ProductVersion="0.0.0.22" publishDir="/dist/" dstrip="true" local="false" ignored="false">
<file name="main.aardio" path="main.aardio" comment="main.aardio"/> <file name="main.aardio" path="main.aardio" comment="main.aardio"/>
<folder name="资源文件" path="res" embed="true" local="false" ignored="false"> <folder name="资源文件" path="res" embed="true" local="false" ignored="false">
<file name="app.ico" path="res\app.ico" comment="res\app.ico"/> <file name="app.ico" path="res\app.ico" comment="res\app.ico"/>
<file name="app.png" path="res\app.png" comment="res\app.png"/>
<file name="demo.jpg" path="res\demo.jpg" comment="res\demo.jpg"/> <file name="demo.jpg" path="res\demo.jpg" comment="res\demo.jpg"/>
<file name="heatmap_script.R" path="res\heatmap_script.R" comment="res\heatmap_script.R"/> <file name="result.png" path="res\result.png" comment="res\result.png"/>
<file name="result.jpg" path="res\result.jpg" comment="res\result.jpg"/>
</folder> </folder>
<folder name="窗体文件" path="dlg" comment="目录" embed="true" local="false" ignored="false"/> <folder name="窗体文件" path="dlg" comment="目录" embed="true" local="false" ignored="false"/>
<folder name="script" path="script" embed="true" comment="目录" local="false" ignored="false"/>
</project> </project>

2
main.aardio
View File

@ -40,7 +40,7 @@ import console;
import process.r; import process.r;
import fsys.dlg; import fsys.dlg;
mainForm.editRScript.print($"\res\heatmap_script.R"); mainForm.editRScript.print($"\script\heatmap_script.R");
// 选择文件按钮点击事件 // 选择文件按钮点击事件
mainForm.btnSelectFile.oncommand = function(id, event) { mainForm.btnSelectFile.oncommand = function(id, event) {

BIN
res/result.jpg
View File

Binary file not shown.
Side by Side

Before

Width:  |  Height:  |  Size: 127 KiB

BIN
res/result.png Normal file
View File

Binary file not shown.
Side by Side

After

Width:  |  Height:  |  Size: 92 KiB

2
res/heatmap_script.R → script/heatmap_script.R
View File

@ -67,7 +67,7 @@ circos.track(track.index = get.current.track.index(), panel.fun = function(x, y)
n <- length(cn) n <- length(cn)
circos.text(rep(CELL_META$cell.xlim[2], n) + convert_x(0.5, "mm"), circos.text(rep(CELL_META$cell.xlim[2], n) + convert_x(0.5, "mm"),
1:n + 2.5, 1:n + 2.5,
cn, cex = 0.6, adj = c(0, 0.5), facing = "inside") cn, cex = 1.0, adj = c(0, 0.5), facing = "inside") # 将 cex 从 0.6 改为 1.0
} }
}, bg.border = NA) }, bg.border = NA)