日韩性视频-久久久蜜桃-www中文字幕-在线中文字幕av-亚洲欧美一区二区三区四区-撸久久-香蕉视频一区-久久无码精品丰满人妻-国产高潮av-激情福利社-日韩av网址大全-国产精品久久999-日本五十路在线-性欧美在线-久久99精品波多结衣一区-男女午夜免费视频-黑人极品ⅴideos精品欧美棵-人人妻人人澡人人爽精品欧美一区-日韩一区在线看-欧美a级在线免费观看

歡迎訪問 生活随笔!

生活随笔

當前位置: 首頁 > 编程资源 > 编程问答 >内容正文

编程问答

MSTAR数据转换成图片

發布時間:2023/12/29 编程问答 35 豆豆
生活随笔 收集整理的這篇文章主要介紹了 MSTAR数据转换成图片 小編覺得挺不錯的,現在分享給大家,幫大家做個參考.
最近做畢業設計需要用到MSTAR數據集,比較尷尬的是拿到的數據集是二進制文件,說明中給了一個地址可以下載到轉換工具(https://www.sdms.afrl.af.mil,需翻墻),不過不怎么好用。
README中對MSTAR數據格式說明如下:


FILE FORMAT

Each file is constructed with a prepended, variable-length,?
Phoenix formatted (ASCII) header which contains detailed ground?
truth and sensor information for the specific chip. ?Following?
the Phoenix header is the data block. ?The data block is written?
in Sun floating point format and is divided into two blocks, a?
magnitude block followed by a phase block.


用記事本任意打開一個文件可以看到文件的PhoenixHeader,中間我們需要的信息是NumberOfColumns和NumberOfRows這兩個變量,PhoenixHeader以單獨一行“[EndofPhoenixHeader]”結束,后面跟的是模值塊與相位塊(SAR圖像是一個復矩陣),我們需要提取模值塊并保存為圖片。

下面是代碼:

clear ReadPath = 'D:\Document\Graduation Project\MSTAR\DAA7B02AA\TARGETS\TEST\15_DEG\T72\SN_S7\'; SavePath = 'D:\Document\Graduation Project\MSTAR\DAA7B02AA\TARGETSJPG\TEST\15_DEG\T72\SN_S7\'; FileType = '*.017'; Files = dir([ReadPath FileType]); NumberOfFiles = length(Files); for i = 1 : NumberOfFilesFileName = Files(i).name;NameLength = length(FileName);FID = fopen([ReadPath FileName],'rb','ieee-be');ImgColumns = 0;ImgRows = 0;while ~feof(FID) % 在PhoenixHeader找到圖片尺寸大小Text = fgetl(FID);if ~isempty(strfind(Text,'NumberOfColumns'))ImgColumns = str2double(Text(18:end));Text = fgetl(FID);ImgRows = str2double(Text(15:end));break;endendwhile ~feof(FID) % 跳過PhoenixHeaderText = fgetl(FID);if ~isempty(strfind(Text,'[EndofPhoenixHeader]'))breakendendMag = fread(FID,ImgColumns*ImgRows,'float32','ieee-be');Img = reshape(Mag,[ImgColumns ImgRows]);imwrite(uint8(imadjust(Img)*255),[SavePath FileName(1:NameLength-3) 'jpg']); % 調整對比度后保存fclose(FID); end



更新一下


最近又用到了這個小腳本,不過要自己建文件夾挺麻煩的,把它改了一下,寫成了函數形式。當目標文件夾不存在時可以自動建立目標文件夾,并且支持遞歸建立子文件夾并將生成文件保存至對應的子文件夾。

以下是代碼:

function MSTAR2JPG(sourcePath, targetPath) if ~exist(targetPath,'dir')mkdir(targetPath); end Files = dir(sourcePath); for i = 1:length(Files)if Files(i).isdir == 0FID = fopen([sourcePath '\' Files(i).name],'rb','ieee-be');while ~feof(FID) % 在PhoenixHeader找到圖片尺寸大小Text = fgetl(FID);if ~isempty(strfind(Text,'NumberOfColumns'))ImgColumns = str2double(Text(18:end));Text = fgetl(FID);ImgRows = str2double(Text(15:end));break;endendwhile ~feof(FID) % 跳過PhoenixHeaderText = fgetl(FID);if ~isempty(strfind(Text,'[EndofPhoenixHeader]'))breakendendMag = fread(FID,ImgColumns*ImgRows,'float32','ieee-be');Img = reshape(Mag,[ImgColumns ImgRows]);imwrite(uint8(imadjust(Img)*255),[targetPath '\' Files(i).name(1:end-3) 'JPG']); % 調整對比度后保存clear ImgColumns ImgRowsfclose(FID);elseif strcmp(Files(i).name,'.') ~= 1 && strcmp(Files(i).name,'..') ~= 1if ~exist([targetPath '\' Files(i).name],'dir')mkdir([targetPath '\' Files(i).name]);endMSTAR2JPG([sourcePath '\' Files(i).name],[targetPath '\' Files(i).name]);endend end end

總結

以上是生活随笔為你收集整理的MSTAR数据转换成图片的全部內容,希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯,歡迎將生活随笔推薦給好友。