一些小小问题

目录

1.计算一下程序运行时间，优化一下计算

2.MATLAB画图全屏展示

3.依据不同的图名，批量导出plot

4.批量导入照片

5.批量删除文件夹中的照片

---

1.计算一下程序运行时间，优化一下计算

clear 
clc
close all

tic;
data={'2023.12.16'};
x=0:0.1:200;
y=exp(0.01*x).*sin(x); %
plot(x,y);
xlabel('x');
ylabel('y');
legend('***');
title('***');
fig_location=['fig',data{1},'.png'];
% saveas(gcf,fig_location,'png');
% close(gcf);
end_time=toc;

2.MATLAB画图全屏展示

clear

clc

close all

x=0:0.1:500;

y=exp(0.005*x).*sin(x);

plot(x,y);

xlabel('x');

ylabel('y');

legend('****')

title('****')

set(gcf,'Position',get(0,'Screensize')); %将图像全屏显示

3.依据不同的图名，批量导出plot

clear

clc

close all

t=0:0.1:2;

nowdata={'2023.10.5','2023.10.6','2023,10.7'};

for II=1:3

y=II*sin(t)+(II-1)*cos(t);

plot(y)

xlabel('时间');

ylabel('幅值');

legend('****')

name=nowdata{II};

saveas(gcf,[nowdata{II},'.png']);

close(gcf);

end

4.批量导入照片

clear

clc

close all

% 创建或获取演示文稿对象

ppt = Presentation('new_presentation.pptx', '演示文稿1.pptx');

open(ppt);

% 添加新的幻灯片

slide1 = add(ppt, 'Title Slide');

% 指定第一张图片路径

imagePath1 = 'C:\Users\Administrator\Desktop\001\阵风因子-横风向图2023.12.6.png';

% 创建第一张图片对象

pic1 = Picture(imagePath1);

% 设置第一张图片位置和尺寸（单位为厘米）

pic1.X = '2cm'; % 图片左上角的横坐标距离幻灯片左边缘的距离

pic1.Y = '2cm'; % 图片左上角的纵坐标距离幻灯片上边缘的距离

pic1.Width = '10cm'; % 图片的宽度

pic1.Height = '5cm'; % 图片的高度

% 指定第二张图片路径

imagePath2 = 'C:\Users\Administrator\Desktop\001\2023.12.6.png';

% 创建第二张图片对象

pic2 = Picture(imagePath2);

% 设置第二张图片位置和尺寸（单位为厘米）

pic2.X = '12cm'; % 图片左上角的横坐标距离幻灯片左边缘的距离

pic2.Y = '2cm'; % 图片左上角的纵坐标距离幻灯片上边缘的距离

pic2.Width = '8cm'; % 图片的宽度

pic2.Height = '8cm'; % 图片的高度

% 将两张图片添加到幻灯片

add(slide1, pic1);

add(slide1, pic2);

% 添加新的幻灯片（第二页）

slide2 = add(ppt, 'Title Slide');

% 指定第二页图片路径

imagePath3 = 'C:\Users\Administrator\Desktop\001\2023.12.6.png';

% 创建第二页图片对象

pic3 = Picture(imagePath3);

% 设置第二页图片位置和尺寸（单位为厘米）

pic3.X = '2cm'; % 图片左上角的横坐标距离幻灯片左边缘的距离

pic3.Y = '2cm'; % 图片左上角的纵坐标距离幻灯片上边缘的距离

pic3.Width = '10cm'; % 图片的宽度

pic3.Height = '5cm'; % 图片的高度

% 将第二页图片添加到第二页幻灯片

add(slide2, pic3);

% 保存并关闭演示文稿

close(ppt);

5.批量删除文件夹中的照片

clear

clc

close all

% 指定文件夹路径

folderPath = 'C:\Users\Administrator\Desktop\test';

cd(folderPath)

% 获取文件夹中所有文件的信息

files = dir(fullfile(folderPath, '*.png')); % 更改扩展名以匹配你的文件类型

% 删除每个照片文件

for i = 1:length(files)

filePath = fullfile(folderPath, files(i).name);

delete(filePath);

end