done'

OOequipment/subfiles/RC_TransferFunction_script.m

@@ -25,10 +25,14 @@ if theory_only == false
     data = transferFunction(oscilloscope,functiongenerator,f_start,f_stop,amplitude,n_steps,n_measurements);
 %% Plotting
     %% Process the data
-    A_mean = mean(data.magnitude);
-    P_mean = mean(data.phase);
-    A_std = std(data.magnitude);
-    P_std = std(data.phase);
+    A_mean = mean(data.magnitude,1);
+    P_mean = mean(data.phase,1);
+    A_std = zeros(1,data.steps);
+    P_std = zeros(1,data.steps);
+    if data.measurements > 1
+        A_std = std(data.magnitude,1);
+        P_std = std(data.phase,1);
+    end
     A_mean_log = 20*log10(A_mean);
     A_std_log_neg = A_mean_log - 20*log10(A_mean - A_std);
     A_std_log_pos = 20*log10(A_mean + A_std) - A_mean_log;