How does function ListPlot3D color according to the values (or specified value) in the fourth column?

I want to plot the data from the second to the fourth columns and color them according to the data in the fifth column:

data = {{1., 74., 781., 5., 4.}, {2., 1373., 731., 11., 4.}, {3., 
   1321., 1791., 28., 4.}, {4., 0., 1787., 4., 2.}, {5., 1049., 2127.,
    12., 4.}, {6., 1647., 2728., 6., 2.}, {7., 2883., 3617., 15., 
   4.}, {8., 2383., 3692., 7., 2.}, {9., 2708., 2295., 22., 4.}, {10.,
    2933., 1767., 7., 4.}, {11., 4233., 895., 6., 5.}, {12., 4043., 
   1895., 14., 1.}, {13., 2427., 3971., 2., 1.}, {14., 3526., 4357., 
   7., 4.}, {15., 5062., 4339., 5., 4.}, {16., 4777., 4897., 8., 
   1.}, {17., 5868., 4904., 16., 4.}, {18., 6534., 5641., 6., 
   1.}, {19., 5481., 6004., 0., 4.}, {20., 4592., 4603., 6., 
   1.}, {21., 2486., 5999., 2., 1.}, {22., 3299., 6018., 4., 
   4.}, {23., 3573., 6213., 5., 1.}, {24., 4741., 6434., 5., 5.}};

ListPointPlot3D(data((All, 2 ;; All)), ColorFunctionScaling -> True, 
 ColorFunction -> (Hue(#4) &), PlotRange -> Full)

But the above graph cannot be dyed according to the fifth column data. What should I do?