Add G optimality option for experiment design.

Author: Munsky

src/CommandLine/SSIT.m

@@ -1178,6 +1178,11 @@ function sampleDataFromFSP(obj,fspSoln,saveFile)
                     if strcmp(FIMMetric(1:2),'TR')
                         k = eval(FIMMetric(3:end));
                         met = @(A)det(inv(A(k,k)));
+                    elseif strcmp(FIMMetric(1:2),'GR')
+                        k = eval(FIMMetric(3:end));
+                        ek = zeros(length(k),length(fims{1}));
+                        ek(1:length(k),k) = eye(length(k));
+                        met = @(A)det(ek*inv(A)*ek');
                     else  % all parameters are free.
                         k = eval(FIMMetric);
                         ek = zeros(length(k),length(fims{1}));