We first introduce an R function distinguish.fisher() of the multi-classification Fisher discriminant analysis and two other useful R functions: discriminant_table() (used to calculate the discriminant table) and plot_fisher() (used for the scatterplot of the first two discriminant scores). Then we do two case studies, the first case study shows that the R function distinguish.fisher() written by us is correct; the second case study shows that the function distinguish.fisher() can solve two-classification problems.