Matlab 进阶学习记录

时间:2023-03-09 17:12:49
Matlab 进阶学习记录

Matlab 进阶学习记录

1. conf_proposal  =  proposal_config('image_means', model.mean_image, 'feat_stride', model.feat_stride);

  

function conf = proposal_config(varargin)
% conf = proposal_config(varargin)
% --------------------------------------------------------
% Faster R-CNN
% Copyright (c) 2015, Shaoqing Ren
% Licensed under The MIT License [see LICENSE for details]
% -------------------------------------------------------- ip = inputParser ; %% training
ip.addParamValue('use_gpu', gpuDeviceCount > 0, ...
@islogical); % whether drop the anchors that has edges outside of the image boundary
ip.addParamValue('drop_boxes_runoff_image', ...
true, @islogical); % Image scales -- the short edge of input image
ip.addParamValue('scales', 600, @ismatrix);
% Max pixel size of a scaled input image
ip.addParamValue('max_size', 1000, @isscalar);
% Images per batch, only supports ims_per_batch = 1 currently
ip.addParamValue('ims_per_batch', 1, @isscalar);
% Minibatch size
ip.addParamValue('batch_size', 256, @isscalar);
% Fraction of minibatch that is foreground labeled (class > 0)
ip.addParamValue('fg_fraction', 0.5, @isscalar);
% weight of background samples, when weight of foreground samples is
% 1.0
ip.addParamValue('bg_weight', 1.0, @isscalar);
% Overlap threshold for a ROI to be considered foreground (if >= fg_thresh)
ip.addParamValue('fg_thresh', 0.7, @isscalar);
% Overlap threshold for a ROI to be considered background (class = 0 if
% overlap in [bg_thresh_lo, bg_thresh_hi))
ip.addParamValue('bg_thresh_hi', 0.3, @isscalar);
ip.addParamValue('bg_thresh_lo', 0, @isscalar);
% mean image, in RGB order
ip.addParamValue('image_means', 128, @ismatrix);
% Use horizontally-flipped images during training ?
ip.addParamValue('use_flipped', true, @islogical);
% Stride in input image pixels at ROI pooling level (network specific)
% 16 is true for {Alex,Caffe}Net, VGG_CNN_M_1024, and VGG16
ip.addParamValue('feat_stride', 16, @isscalar);
% train proposal target only to labled ground-truths or also include
% other proposal results (selective search, etc.)
ip.addParamValue('target_only_gt', true, @islogical); % random seed
ip.addParamValue('rng_seed', 6, @isscalar); %% testing
ip.addParamValue('test_scales', 600, @isscalar);
ip.addParamValue('test_max_size', 1000, @isscalar);
ip.addParamValue('test_nms', 0.3, @isscalar);
ip.addParamValue('test_binary', false, @islogical);
ip.addParamValue('test_min_box_size',16, @isscalar);
ip.addParamValue('test_drop_boxes_runoff_image', ...
false, @islogical); ip.parse(varargin{:});
conf = ip.Results; assert(conf.ims_per_batch == 1, 'currently rpn only supports ims_per_batch == 1'); % if image_means is a file, load it...
if ischar(conf.image_means)
s = load(conf.image_means);
s_fieldnames = fieldnames(s);
assert(length(s_fieldnames) == 1);
conf.image_means = s.(s_fieldnames{1});
end
end

  

The inputParser object allows you to manage inputs to a function by creating an input scheme. To check the input, you can define validation functions for required arguments, optional arguments, and name-value pair arguments. Optionally, you can set properties to adjust the parsing behavior, such as handling case sensitivity, structure array inputs, and inputs that are not in the input scheme.

After calling the parse method to parse the inputs, the inputParser saves names and values of inputs that match the input scheme (stored in Results), names of inputs that are not passed to the function and, therefore, are assigned default values (stored in UsingDefaults), and names and values of inputs that do not match the input scheme (stored in Unmatched).

  

Check the validity of required and optional function inputs.

Create a custom function with required and optional inputs in the file findArea.m.

function a = findArea(width,varargin)
p = inputParser;
defaultHeight = 1;
defaultUnits = 'inches';
defaultShape = 'rectangle';
expectedShapes = {'square','rectangle','parallelogram'}; addRequired(p,'width',@isnumeric);
addOptional(p,'height',defaultHeight,@isnumeric);
addParameter(p,'units',defaultUnits);
addParameter(p,'shape',defaultShape,...
@(x) any(validatestring(x,expectedShapes))); parse(p,width,varargin{:});
a = p.Results.width .* p.Results.height;
The input parser checks whether width and height are numeric, and whether the shape matches a string in cell array expectedShapes. @ indicates a function handle, and the syntax @(x) creates an anonymous function with input x. Call the function with inputs that do not match the scheme. For example, specify a nonnumeric value for the width input: findArea('text')
Error using findArea (line 14)
The value of 'width' is invalid. It must satisfy the function: isnumeric.
Specify an unsupported value for shape: findArea(4,'shape','circle')
Error using findArea (line 14)
The value of 'shape' is invalid. Expected input to match one of these strings: square, rectangle, parallelogram The input, ''circle'', did not match any of the valid strings.

 http://www.cnblogs.com/heleifz/p/matlab-function-handle.html 

2. assert 语句的使用:

  assert: Generate an error when a condition is violated.  

  assert(EXPRESSION, ERRMSG) evaluates EXPRESSION and, if it is false, displays the string contained in ERRMSG. When ERRMSG is the last input to assert, MATLAB displays it literally, without performing any substitutions on the characters in ERRMSG.

  例如:如果 contion 不成立,则会输出对应的:提示错误信息。

    assert(mod(conf.batch_size, num_images) == 0, ...
sprintf('num_images %d must divide BATCH_SIZE %d', num_images, conf.batch_size));

  

3.  permute 函数:

 Permute array dimensions.

B = permute(A,ORDER) rearranges the dimensions of A so that they

are in the order specified by the vector ORDER.

  

  重新安排矩阵的x,y,z , 在二维中就相当于把x,y 对换,在三维中相当于可以把三个坐标的位置互换。

比如A =
A(:,:,1)=repmat(1,3,3);
A(:,:,2)=repmat(2,3,3);
A(:,:,3)=repmat(3,3,3);
disp(A); A(:,:,1) = 1 1 1
1 1 1
1 1 1 A(:,:,2) = 2 2 2
2 2 2
2 2 2 A(:,:,3) = 3 3 3
3 3 3
3 3 3 At = permute(A,[3,2,1]);
disp(At); At(:,:,1) = 1 1 1
2 2 2
3 3 3 At(:,:,2) = 1 1 1
2 2 2
3 3 3 At(:,:,3) = 1 1 1
2 2 2
3 3 3
permute(A,[3,2,1])

  

4. cellfun 函数:

  cellfun: Apply a function to each cell of a cell array. A = cellfun(FUN, C) applies the function specified by FUN to the contents of each cell of cell array C, and returns the results in the array A.

5. 从列表 A 中去搜索列表 B 中是否存在有相交元素,即:求 A and B 的差。

  

select = importdata('/home/wangxiao/Documents/Sun-80-dataset/VGG_16/iter_1/SUN80_50%_selected_without_HD.txt');
Unlabel = importdata('/home/wangxiao/Documents/Sun-80-dataset/iter_1/Sun_100_UnLabel_Train_0.5_.txt'); fid = fopen('/home/wangxiao/Documents/Sun-80-dataset/VGG_16/iter_1/SUN80_50%_Unselected_data.txt', 'a') ; selected_list = [] ;
unselected_list = [] ; for i = 1:size(Unlabel.data, 1)
disp(['deal with: ', num2str(i) , '/' , num2str(size(Unlabel.data, 1))]) ;
unlabel_name = Unlabel.textdata{i, 1}; % Unlabel image name
unlabel_label = Unlabel.data(i, 1) ; % Unlabel image label
count = 0;
for j = 1:size(select.textdata, 1)
select_name = select.textdata{j, 1}; % selected image name if strcmp(unlabel_name, select_name) % if have selected, jump it.
selected_list = [selected_list; unlabel_name];
% break;
else
count = count + 1;
end
if count == size(select.textdata, 1)
fprintf(fid, '%s ', num2str(unlabel_name));
fprintf(fid, '%s \n', num2str(unlabel_label));
end
end end

6. containers.Map() 的用法

  matlab中的containers.Map()有点类似于C++ STL中的map容器,具有key/value映射的功能.

    num = containers.Map({1, 2, 3}, {'one', 'two', 'three'})

  myMap = containers.Map(KEYS, VALUES) constructs a Map object myMap that contains one or more keys and a value for each of these keys, as specified in the KEYS and VALUES arguments.

  例如:从 Map 上提取一个值:myValue = myMap(key) ;

  修改键值对 (key-values pairs): myMap(key) = newValue ;

  增加一个新的键值对:myMap(key) = newValue ;

  可以通过 remove 的方法将 values 删除掉。


7. try catch end 机制:

  该机制可以防止由于程序中可能出现的错误而终止运行的情况:

  try

   ld     = load(anchor_cache_file) ;

     anchors   = ld.anchors ;

  catch

   base_anchor  = [1, 1, opts.base_size, opts.base_size] ;

     ratio_anchors     = ratio_jitter(base_anchor, opts.ratios) ;

  end


 8. About change the gray image into 3 channel RGB image: 

 clc; close all; clear all;
image = imread('/home/wangxiao/Documents/mnist_dataset/mnist_0_.png');
image = im2double(image);
image = double(image);
width = size(image, ); height = size(image, ); synthetic = zeros([, ]); for i = :size(image, )
for j = :size(image, ) synthetic(i, j) = image(i, j);
synthetic(i, j) = image(i, j);
synthetic(i, j) = image(i, j);
end
end
synthetic = im2uint8(synthetic);
imshow(synthetic);
figure; imshow(image); %%
synthetic2 = zeros([, , ]); for i = :size(image, )
for j = :size(image, ) synthetic2(i, j, ) = image(i, j, );
synthetic2(i, j, ) = image(i, j, );
synthetic2(i, j, ) = image(i, j, );
end
end
synthetic2 = im2uint8(synthetic2);
imshow(synthetic2);

synthetic is a single channel image, and synthetic2 is a three channel image.

Another Solution is: 

% if grayscale repeat one channel to match filters size
if(size(im, 3)==1)
  im = repmat(im, [1 1 3]);
end


9. Divided the image into specific patches using matlab function: mat2cell 

Matlab 进阶学习记录

  This is a really cool function. For example, you read one image and divide it into 3*3 = 9 patches, and we assume the resolution of the image is: 100*100, you just need set the vectors M = [20, 30, 50]; N = [20, 20, 60] ;

Actually, as long as the sum of three values you set  equal to 100 (here is 20, 30, 50), it will be ok. The other vector N have the same reason.


10. Read images from disks and save these frames into avi video files.

 %% change the frame to videos to save.
clc; close all; clear all;
path = '/home/wangxiao/Downloads/files/Visual_Tracking/MDNet-CVPR2016/saved_tracking_results_MDNet_OTB100/Biker/';
files = dir([path, '*.png']);
count = ; for i=:size(files, )
xxx = strtok(files(i).name, 'M');
name = xxx(:end-);
image = imread([path, files(i).name]);
index = sprintf('%04d', str2double(name));
newName = [ index,'.jpg']; % a = sprintf('%04d',i); imwrite(image, [path, newName]);
end disp('==>> deal with image done !') jpgFiles = dir([path, '*.jpg']);
videoName = '/home/wangxiao/Videos/Biker_MDNet_OTB100.avi';
fps = ; %帧率
startFrame = ; %从哪一帧开始
endFrame = size(jpgFiles, ); %哪一帧结束 %生成视频的参数设定
aviobj=VideoWriter(videoName); %创建一个avi视频文件对象,开始时其为空
aviobj.FrameRate=fps; open(aviobj);%Open file for writing video data for i=startFrame:endFrame
frames = imread([path, jpgFiles(i).name]);
frames = im2frame(frames);
writeVideo(aviobj, frames);
end
close(aviobj); disp('==>> saved the video !')

11. Matlab中save实现保存数据到mat文件的正确使用  参考:http://blog.csdn.net/fx677588/article/details/52836348

 . 普通保存在当前文件夹下

   save matPath.mat A B;   % A B都是生成的数据矩阵

   需要注意这种方式只能将数据保存在当前文件夹下的第一个参数文件中,下面这样写并不能将数据保存到你想要的文件夹中的。

   saldir = './result/';
  savePath = [saldir imnames(len).name(:end-) '_KSD'];
  save savePath A;   上面程序也只能实现在当前文件夹下生成savePath.mat文件,然后数据保存到该文件中。并不能保存到需要的文件夹中。正确的写法是下面的方式。 . 保留数据到其他文件夹下   saldir = './result/';
  savePath = [saldir imnames(len).name(:end-) '_KSD' '.mat'];
  save(savePath,'A'); % 保存到其他文件夹的写法 这里也需要注意,保存的数据矩阵,即save函数的第二个参数不可以忘记单引号。

 12. 根据 attention maps 置信度的高低,生成对应的 bounding box : 

clc;close all;clear all;
Img=imread('/home/wangxiao/Documents/files/Visual_Tracking/MDNet-CVPR2016/MDNet-master/attentionMap/Basketball/0001.png');
if ndims(Img)==
I=rgb2gray(Img);
else
I=Img;
end
I=im2bw(I,graythresh(I));
[m,n]=size(I);
imshow(I);title('binary image');
txt=get(gca,'Title');
set(txt,'fontsize',);
L=bwlabel(I);
stats=regionprops(L,'all');
set(gcf,'color','w');
set(gca,'units','pixels','Visible','off');
q=get(gca,'position');
q()=;%设置左边距离值为零
q()=;%设置右边距离值为零
set(gca,'position',q);
for i=:length(stats)
hold on;
rectangle('position',stats(i).BoundingBox,'edgecolor','y','linewidth',);
temp = stats(i).Centroid;
plot(temp(),temp(),'r.');
drawnow;
end
frame=getframe(gcf,[,,n,m]);
im=frame2im(frame);
imwrite(im,'a.jpg','jpg');%可以修改保存的格式

Matlab 进阶学习记录

Python Implementation: (from: https://www.jianshu.com/p/7693222523c0 )

import numpy as np
import scipy.ndimage as ndi
from skimage import measure,color
import matplotlib.pyplot as plt #编写一个函数来生成原始二值图像
def microstructure(l=256):
n = 5
x, y = np.ogrid[0:l, 0:l] #生成网络
mask = np.zeros((l, l))
generator = np.random.RandomState(1) #随机数种子
points = l * generator.rand(2, n**2)
mask[(points[0]).astype(np.int), (points[1]).astype(np.int)] = 1
mask = ndi.gaussian_filter(mask, sigma=l/(4.*n)) #高斯滤波
return mask > mask.mean() data = microstructure(l=128)*1 #生成测试图片 labels=measure.label(data,connectivity=2) #8连通区域标记
dst=color.label2rgb(labels) #根据不同的标记显示不同的颜色
print('regions number:',labels.max()+1) #显示连通区域块数(从0开始标记) fig, (ax1, ax2) = plt.subplots(1, 2, figsize=(8, 4))
ax1.imshow(data, plt.cm.gray, interpolation='nearest')
ax1.axis('off')
ax2.imshow(dst,interpolation='nearest')
ax2.axis('off') fig.tight_layout()
plt.show()

Matlab 进阶学习记录

如果想分别对每一个连通区域进行操作,比如计算面积、外接矩形、凸包面积等,则需要调用measure子模块的regionprops()函数。该函数格式为:

skimage.measure.regionprops(label_image)

返回所有连通区块的属性列表,常用的属性列表如下表:

属性名称    类型  描述
area int 区域内像素点总数
bbox tuple 边界外接框(min_row, min_col, max_row, max_col)
centroid array   质心坐标
convex_area int 凸包内像素点总数
convex_image ndarray 和边界外接框同大小的凸包  
coords ndarray 区域内像素点坐标
Eccentricity float 离心率
equivalent_diameter float 和区域面积相同的圆的直径
euler_number int   区域欧拉数
extent float 区域面积和边界外接框面积的比率
filled_area int 区域和外接框之间填充的像素点总数
perimeter float 区域周长
label int 区域标记

 13. 将 video 切割为 frame: 

%% Input 2 videos and divide it into frames
clc; clear all; close all;
infraredvideo = 'C:\Users\王逍\Desktop\跟踪数据集\videos\';
savePath = 'C:\Users\王逍\Desktop\跟踪数据集\frames\'; % devide the infrared video into infrared images
videoList1=dir(fullfile(infraredvideo,'*.mp4'));
video_num=length(videoList1); for j=1:video_num infraredOutPath = [savePath, videoList1(j).name, '\'];
mkdir(infraredOutPath); frames = VideoReader([strcat(infraredvideo,videoList1(j).name)]);
numFrames =frames.NumberOfFrames;
for k = 1 : numFrames
disp(['==>> processing video ',num2str(k),' frames, please waiting....']);
frame = read(frames,k);
frame = imresize(frame, [480, 640]);
% figure(1); imshow(frame);
imwrite(frame, [infraredOutPath, sprintf('%08d.png',k)]);
end end

14. divide the total attention maps according to given video frames such as TC128. 

 %%
clc; close all; clear all;
path = '/media/wangxiao/E1F171026416B63F/tracking_benchmark/Temple-color-128/predicted_attentionMaps-v1/';
attentionfiles = dir([path, '*.png']); videoPath = '/media/wangxiao/E1F171026416B63F/tracking_benchmark/Temple-color-128/videos/';
videoFiles = dir(videoPath);
videoFiles = videoFiles(:end);
total = ;
savepath = '/media/wangxiao/E1F171026416B63F/tracking_benchmark/Temple-color-128/attentionMaps_per_video-v1/'; for i=:size(videoFiles, )
numCount = ;
videoName = videoFiles(i).name;
newVideoPath = [videoPath videoName '/img/']; videoframes = dir([newVideoPath, '*.jpg']); savePath = [savepath videoName '/'];
mkdir(savePath); disp(['==>> deal with video file: ', num2str(i)]);
% total = total + size(videoframes, ); for j=:size(videoframes, )
if numCount < size(videoframes, )
total = total + ;
numCount = numCount + ;
img = imread([path attentionfiles(total).name]);
% figure(); imshow(img); temp = sprintf('%04d', numCount);
saveName = [temp '.png'];
imwrite(img, [savePath saveName]);
else
break;
end end end

15. count the image list into txt files. 

 %%
market1501_path = '/home/wangxiao/Downloads/person-ReID/open-reid/examples/data/market1501/';
txtsavePath = '/home/wangxiao/Downloads/person-ReID/open-reid/examples/data/market1501/image_txt_list/'; bounding_box_test = [market1501_path 'bounding_box_test/'];
bounding_box_train = [market1501_path 'bounding_box_train/'];
gt_bbox = [market1501_path 'gt_bbox/'];
gt_query = [market1501_path 'gt_query/'];
images = [market1501_path 'images/'];
query = [market1501_path 'query/']; % #####################
bounding_box_test_files = dir([bounding_box_test, '*.jpg']);
bounding_box_train_files = dir([bounding_box_train, '*.jpg']);
gt_bbox_files = dir([gt_bbox, '*.jpg']);
gt_query_files = dir([gt_query, '*.jpg']);
images_files = dir([images, '*.jpg']);
query_files = dir([query, '*.jpg']); %% image files I
fid = fopen([txtsavePath 'bounding_box_test_files_image_list.txt'], 'w');
for i=:size(bounding_box_test_files, )
imgName = bounding_box_test_files(i).name;
fprintf(fid, '%s \n', imgName);
end
fclose(fid);
disp('==>> done I'); %% image files II
fid = fopen([txtsavePath 'bounding_box_train_files_image_list.txt'], 'w');
for i=:size(bounding_box_train_files, )
imgName = bounding_box_train_files(i).name;
fprintf(fid, '%s \n', imgName);
end
fclose(fid);
disp('==>> done II'); %% image files III
fid = fopen([txtsavePath 'gt_bbox_files_image_list.txt'], 'w');
for i=:size(gt_bbox_files, )
imgName = gt_bbox_files(i).name;
fprintf(fid, '%s \n', imgName);
end
fclose(fid);
disp('==>> done III'); %% image files IV
fid = fopen([txtsavePath 'gt_query_files_image_list.txt'], 'w');
for i=:size(gt_query_files, )
imgName = gt_query_files(i).name;
fprintf(fid, '%s \n', imgName);
end
fclose(fid);
disp('==>> done IV'); %% image files V
fid = fopen([txtsavePath 'images_files_image_list.txt'], 'w');
for i=:size(images_files, )
imgName = images_files(i).name;
fprintf(fid, '%s \n', imgName);
end
fclose(fid);
disp('==>> done V'); %% image files VI
fid = fopen([txtsavePath 'query_files_image_list.txt'], 'w');
for i=:size(query_files, )
imgName = query_files(i).name;
fprintf(fid, '%s \n', imgName);
end
fclose(fid);
disp('==>> done VI');

16. load json files using matlab code.

  this used package from: http://blog.csdn.net/sophia_xw/article/details/70141208    

  unzip this file and add path to matlab like this:

  

clear all; clc  

addpath('/home/wangxiao/jsonlab-1.5/jsonlab-1.5');

fname='results.json';
jsonData=loadjson(fname);

  

 17. 伪彩色图像的生成:

%%
clc; close all; clear all;
path = '\MotorRolling\';
files = dir([path, '*.png']);
savePath = '\fakeColor_MotorRolling\'; ori_img_path = '\Benchmark\MotorRolling\img\';
ori_img = imread([ori_img_path, '0001.jpg']);
oriFiles = dir([ori_img_path, '*.jpg']);
height = size(ori_img, );
width = size(ori_img, ); for img_idex =:length(files)
im = imread([path, files(img_idex).name]);
originalImage = imread([ori_img_path, oriFiles(img_idex).name]); % for idx =:size(im, )
% for jdx = :size(im, )
% if im(idx, jdx) <= ;
% im(idx, jdx) = ;
% end
% end
% end I=double(im);
[m,n]=size(I);
L=;
for i=:m
for j=:n
if I(i,j)<=L/
R(i,j)=;
G(i,j)=*I(i,j);
B(i,j)=L;
else if I(i,j)<=L/
R(i,j)=;
G(i,j)=L;
B(i,j)=-*I(i,j)+*L;
else if I(i,j)<=*L/
R(i,j)=*I(i,j)-*L;
G(i,j)=L;
B(i,j)=;
else
R(i,j)=L;
G(i,j)=-*I(i,j)+*L;
B(i,j)=;
end
end
end
end
end
for i=:m
for j=:n
rgbim(i,j,)=R(i,j);
rgbim(i,j,)=G(i,j);
rgbim(i,j,)=B(i,j);
end
end
rgbim=rgbim/;
% figure;
% subplot(,,);
% imshow(gray);
% subplot(,,); fake_color_img = imresize(rgbim, [height, width]);
imshow(fake_color_img);
imwrite(fake_color_img, [savePath, oriFiles(img_idex).name]); img_idex end

Matlab 进阶学习记录

18. frame to video transformation

%%
clc; close all; clear all;
videoPath='\demo_videos\demo_Skater2\';
salVideo = '\Benchmark\Skater2\img\';
resultsPath = '\saved_figure_tracking_results\Skater2\v\';
file=dir([videoPath,'*.jpg']);
file_=dir([salVideo,'*.jpg']);
resultsFiles = dir([resultsPath, '*.jpg']);
writerObject = VideoWriter('OUR_Skater2.avi');
writerObject.FrameRate =25; %writerObject.Quality = 50;
open( writerObject );
Num= length(file);
for k =1 : Num
trackingResults = imread([resultsPath, resultsFiles(k).name]);
disp(['processing the ',num2str(k),'/',num2str(Num),' frames, please waiting....']);
frame_1 = imread([videoPath,file(k).name]);
frame_222 = imread([salVideo,file_(k).name]); frame_2 = zeros(size(frame_222, 1), size(frame_222, 2), 3);
if size(frame_222, 3) == 1
frame_2(:,:,1) = frame_222;
frame_2(:,:,1) = frame_222;
frame_2(:,:,1) = frame_222;
end
frame_2 = uint8(frame_2); frame_3 = frame_1*0.5+frame_2*0.5;
trackingResults = imresize(trackingResults, [size(frame_2, 1), size(frame_2, 2)]);
fullframe = [ frame_2, frame_3, trackingResults ];
writeVideo( writerObject, fullframe );
end
close( writerObject );

19. video to frame transformation: 

clear all;close all;

%% video
videoPath='.\2\';
outPath='.\2\'; T=[1.72844 0.0692766 -293
-0.0692766 1.72844 -94
0 0 1]; tform = maketform('affine', T');
videoList=dir(fullfile(videoPath,'*.avi'));
video_num=length(videoList);
for j=1:video_num frames = VideoReader (strcat(videoPath,videoList(j).name));
numFrames =frames.NumberOfFrames;
for k = 1 : numFrames
disp(['processing the ',num2str(k),' frames, please waiting....']);
frame = read(frames,k);
transformFrame = imtransform(frame,tform,'XData',[1 320], 'YData',[1 240]);
% frame=imresize(frame,[288,384]);
imwrite(transformFrame,[outPath,sprintf('%08d.png',k)]); end end

 20. Matlab load json files and save it into txt file: 

%%
clc; close all; clear all; warning off;
addpath('E:\Matlab2018\jsonlab-1.5\jsonlab-1.5');
oriVideoPath = 'I:\Tracking-Dataset\Video_Labeled_set\';
savePath = 'E:\dataset_processsed_data\'; videoFiles = dir(oriVideoPath);
videoFiles = videoFiles(:end); for videoIDX =:size(videoFiles, )
videoName = videoFiles(videoIDX).name;
videoPath = [oriVideoPath videoName '\']; video_imgPath = [videoPath '*.png'];
video_imgFiles = dir(video_imgPath); saveImage_path = [savePath videoName '\imgs\'];
mkdir(saveImage_path); anno_files = dir(videoPath);
anno_name = anno_files( length(anno_files)).name;
anno_path = [videoPath anno_name '\']; annoFiles = dir(anno_path);
annoFiles = annoFiles(:end); gt_txtFiles = fopen([savePath videoName '\groundtruth.txt'], 'w'); for imgIDX =:size(video_imgFiles, ) disp(['==>> video ', num2str(videoIDX), '\', num2str(size(videoFiles, 1)), ' img ', num2str(imgIDX), '\', num2str(size(video_imgFiles, 1))]); image = imread([videoPath video_imgFiles(imgIDX).name]);
imageIndex = sprintf('%05d', imgIDX);
newImgName = [num2str(imageIndex) '.png'] ;
imwrite(image, [saveImage_path newImgName]); jsonFIle_path = [anno_path annoFiles(imgIDX).name];
json2data = loadjson(jsonFIle_path);
BBox = json2data.outputs.object{, }.bndbox;
x1 = BBox.xmin;
y1 = BBox.ymin;
w = BBox.xmax - BBox.xmin;
h = BBox.ymax - BBox.ymin; fprintf(gt_txtFiles, '%s', num2str(x1));
fprintf(gt_txtFiles, ',');
fprintf(gt_txtFiles, '%s', num2str(y1));
fprintf(gt_txtFiles, ',');
fprintf(gt_txtFiles, '%s', num2str(w));
fprintf(gt_txtFiles, ',');
fprintf(gt_txtFiles, '%s', num2str(h));
fprintf(gt_txtFiles, '\n'); end fclose(gt_txtFiles);
end