ssa

1
clear; close all; clc;
2
% Names:
3
% "P1H1"
4
% "P1LC1" "P1LC2" "P1LC3" "P1LC4" "P1LC5" "P1LC6" "P1LC7"
5
% "P1M1" "P1M2" "P1M3"
6
% "P2LC1" "P2LC2" "P2LC3" "P2LC4" "P2LC5"
7
% "P3LC1" "P3LC2" "P3LC3" "P3LC4" "P3LC5"
8

9
Name = "P1H1"; % Name of experiment
10
zrp="endh/"; % Zero FolderP
11
Path=zrp+Name+'/';
12
% ncPrefix=""; %Prefix for modework
13
ncPrefix="_nc"; %Prefix for modework
14

15
RGB=load(Path+Name+ncPrefix+'_RGB.txt');
16
RGBmed=Median1RGB(RGB);
17

18
% Ñèãíàë ôîòîïëåòèçìîãðàôèè
19
pw=rgb2pw(RGBmed, "Cr");
20
Save(pw,Path+Name+ncPrefix+'_pw.txt')
21
% pw=load(Path+Name+ncPrefix+'_pw.txt');
22

23
chss2(pw, Path, Name+ncPrefix);