```GAUSS /****************************************************** Plotting Section *******************************************************/ // Layout plotOpenWindow(); // Plot control structure struct plotControl myPlot; myPlot = plotGetDefaults("XY"); // Turn grid off plotSetGrid(&myPlot, "off"); // Font settings font_name = "Helvetica Neue"; font_color = "#3e3e3e"; title_size = 18; label_size = 14; legend_size = 12; /*********************************************** Predicted state ************************************************/ // Legend plotSetLegend(&myPlot, "Predicted"$|"Observed"); plotSetLegendFont(&myPlot, font_name, legend_size, font_color); // Change color of axes numbers plotSetTicLabelFont(&myPlot, font_name, legend_size, font_color); // Title plotSetTitle(&myPlot, "Kalman Filter Predicted State: AR(2) Model", font_name, title_size, font_color); // Set up to add plot of filtered data // Turn line symbol off plotSetLineSymbol(&myPlot, -1); x = seqa(1, 1, cols(yt)); // XY plot of filtered data plotXY(myPlot, x, rslt.predicted_state[2, 2:cols(yt)+1]'); /*********************************************** Observed Data ************************************************/ // Plot scatter of observed data plotAddScatter(x, yt'); ```