ssa
1clear; close all; clc;
2% P1H1
3% P1H1_noComp
4% P2LC1
5% P2LC1_noComp
6VideoFile = "P1H1.avi"; Path="Files/"; % P1H1_edited
7
8% Extracting a time series of RGB segments
9Face_tracking(Path+VideoFile);
10RGB=load(Path+NameVideoFile(VideoFile)+'_RGB.txt');
11
12% Calculation of the photoplethysmography signal
13rgb2pw(RGB, Path+VideoFile);
14pw=load(Path+NameVideoFile(VideoFile)+'_pw.txt');
15
16
17% Estimates of the average pitch frequencies for PW segments
18chss2(pw);