This vignette demonstrates how to compute and visualize FGDI for subjects with Parkinson’s disease.
data(P_Data) #> Warning in data(P_Data): data set 'P_Data' not found data(P_data_info) #> Warning in data(P_data_info): data set 'P_data_info' not found
ID <- c(rep("Case", 21), rep("Control", 42)) fgdi_out <- FGDI(P_Data, ID, PVE_I=0.99)
plot_gait_comparison(1, "Pelvis Tilt (Parkinson)", fgdi_out, P_Data, ID, combined=TRUE)