@@ -82,6 +82,79 @@ function main(Param_Data,Param_Network,Type_Resuts,savepathbson,Param_Data_test,
8282end
8383
8484
85+
86+ function Confusion_Matrix_CSV_Exp(Param_Data,Param_Network,Param_Data_test,savepathbson= " " )
87+
88+ if Param_Network. Train_args. use_cuda == true
89+ hardware1 = " GPU"
90+ else
91+ hardware1 = " CPU"
92+ end
93+ if savepathbson == " "
94+ if Param_Data. Augmentation_Value. augmentationType == " No_channel"
95+ if Param_Data. permutation == true
96+ savepathbson = " run/Experiment/$(Param_Data. Augmentation_Value. augmentationType) _$(Param_Data. nbTx) _$(Param_Data. Chunksize) _$(Param_Network. Networkname) _$(Param_Data. Type_of_sig) /Run$(Param_Data. run) _Test$(Param_Data. Test) _$(Param_Data. nbTx) _$(Param_Data. nbSignals) _permut/$(hardware1) "
97+ elseif Param_Data. noise== nothing
98+ savepathbson = " run/Experiment/$(Param_Data. Augmentation_Value. augmentationType) _$(Param_Data. nbTx) _$(Param_Data. Chunksize) _$(Param_Network. Networkname) _$(Param_Data. Type_of_sig) /Run$(Param_Data. run) _Test$(Param_Data. Test) _$(Param_Data. nbTx) _$(Param_Data. nbSignals) /$(hardware1) "
99+ else
100+ savepathbson = " run/Experiment/$(Param_Data. Augmentation_Value. augmentationType) _$(Param_Data. nbTx) _$(Param_Data. Chunksize) _$(Param_Network. Networkname) _$(Param_Data. Type_of_sig) /Run$(Param_Data. run) _Test$(Param_Data. Test) _$(Param_Data. nbTx) _$(Param_Data. nbSignals) _$(Param_Data. noise) /$(hardware1) "
101+
102+ end
103+ else
104+ savepathbson = " run/Experiment/$(Param_Data. Augmentation_Value. augmentationType) _$(Param_Data. nbTx) _$(Param_Data. Chunksize) _$(Param_Network. Networkname) /$(Param_Data. nbSignals) _$(Param_Data. Augmentation_Value. Channel) _$(Param_Data. Augmentation_Value. Channel_Test) _nbAugment_$(Param_Data. Augmentation_Value. nb_Augment) /$(hardware1) "
105+ end
106+ end
107+
108+
109+
110+ allAcc = Float64[]
111+
112+ res = RiFyFi_IdF. loadCNN(" $(savepathbson) /model_seed_$(Param_Network. Seed_Network) _dr$(Param_Network. Train_args. dr) .bson" )
113+
114+ model = res. model
115+ testmode!(model, true ) # We are in test mode, with no dropout
116+ (moy,std_val) = (nothing ,nothing )
117+ allAccuracy = Float64[]
118+
119+ (_,_,X_test,Y_test) = Experiment_Database. loadCSV_Exp(Param_Data_test)
120+
121+
122+ if Param_Network. Train_args. use_cuda
123+ device= gpu
124+ else
125+ device = cpu
126+ end
127+ dataTest = Flux. Data. DataLoader((X_test, Y_test), batchsize = Param_Network. Train_args. batchsize, shuffle = true )
128+ l̂,l = inference(model,dataTest,device)
129+ acc = getAccuracy(l̂,l)
130+ @info " acc" acc
131+ confMatrix = confusionMatrix(l̂,l,Param_Data. nbTx)
132+ plt = plotConfusionMatrix(confMatrix )
133+
134+ if Param_Data. permutation== true
135+ savepath = " Results/Exp/$(Param_Data. Augmentation_Value. augmentationType) _$(Param_Data. nbTx) _$(Param_Data. Chunksize) _$(Param_Network. Networkname) _$(Param_Data. Type_of_sig) /RunTrain$(Param_Data. run) _RunTest$(Param_Data_test. run) _Test$(Param_Data_test. Test) _permut/"
136+ else
137+ savepath = " Results/Exp/$(Param_Data. Augmentation_Value. augmentationType) _$(Param_Data. nbTx) _$(Param_Data. Chunksize) _$(Param_Network. Networkname) _$(Param_Data. Type_of_sig) /RunTrain$(Param_Data. run) _RunTest$(Param_Data_test. run) _Test$(Param_Data_test. Test) _$(Param_Data_test. noise) /"
138+ end
139+ ! ispath(savepath) && mkpath(savepath)
140+ Temp= zeros(1 ,Param_Data. nbTx)
141+ if Param_Data. Augmentation_Value. augmentationType == " No_channel"
142+ file= " $(savepath) /confMatrix_$(Param_Data. nbSignals) _$(Param_Data. name) _seed_$(Param_Network. Seed_Network) .csv"
143+ else
144+ file= " $(savepath) /confMatrix_$(Param_Data. nbSignals) _$(Param_Data. name) _$(Param_Data. Augmentation_Value. Channel) _$(Param_Data. Augmentation_Value. Channel_Test) _nbAugment_$(Param_Data. Augmentation_Value. nb_Augment) _seed_$(Param_Network. Seed_Network) .csv"
145+ end
146+ open(file," w" ) do io
147+ for i in 0 : size(confMatrix,1 )- 1
148+ Temp[1 ,:] = round.(confMatrix[i+ 1 ,:]* 100 ;digits= 1 )
149+ writedlm(io,[vcat((Temp))],' ;' ) # Ecriture Re-Im
150+ end
151+ end
152+ MainPlottingMatrix_Latex(file,Param_Data. nbTx)
153+
154+ return acc
155+ end
156+
157+
85158#=
86159function F1_score_Synth(Param_Data,Param_Network,Table_Seed_Network,savepathbson="")
87160
0 commit comments