MATLAB读取ply格式点云⽂件并显⽰图像并输出为txt格式点
云⽂件
txt格式的点云⽂件的优点在于可读性强且较为直观,其格式上,每个点云为⼀个txt⽂件,⽂件中有n⾏,表⽰点云中含有n个点,每⼀⾏含有三个浮点数表⽰每个点的三维坐标值。现笔者⽤MATLAB代码写了⼀个代码,其功能是将当前⽬录下的所有ply格式点云⽂件显⽰成图像并⽣成同名的txt格式点云⽂件。其中,笔者所⽤的ply格式点云⽂件来源于斯坦福点云数据集,⽂末附上斯坦福数据集的下载链接。
%函数功能
%读取当前⽬录下的所有ply格式点云⽂件,显⽰图像,输出为同名称的txt格式⽂件
path=pwd;      %当前所在⽬录
file = dir(fullfile(path,'*.ply'));    %读取所有ply格式⽂件
filenames = {file.name}';
filelength = size(filenames,1);        %ply格式⽂件数
for idx = 1 : filelength              %批处理
filedir = strcat(path, filenames(idx));
ptcloud=pcread(filenames{idx});  %ply格式⽂件⽤pcread读取
figure;
pcshow(ptcloud);
xlabel('X');
ylabel('Y');
zlabel('Z');
title(filenames{idx});
Data(:,1)= double(ptcloud.Location(1:5:end,1));  %提取所有点的三维坐标
Data(:,2)= double(ptcloud.Location(1:5:end,2));
Data(:,3)= double(ptcloud.Location(1:5:end,3));
namesplit=strsplit(filenames{idx},'.');          %分割ply⽂件的名称,分成⽂件名与ply后缀名
frontname=namesplit{1};                          %提取⽂件名,舍弃后缀名
%    fid=fopen(strcat(frontname,'.txt'),'wt');
eval(['fid=fopen(''',frontname,'.txt'',''wt'');']);
[b1,b2]=size(Data);
for i=1:b1                  %将⼆维数组Data写⼊txt格式⽂件中
for j=1:b2-1
fprintf(fid,'%.4f\t ',Data(i,j));          %所有坐标数据保留⼩数点后四位
end
fprintf(fid,'%.4f\n',Data(i,b2));
end
fprintf格式
clear Data;
fclose(fid);
end
⽣成的图像中选取dragon(龙)图⽰如下