One approach, calling ReverseSort only on the relevant data:
Query[ReverseSort[Query[;;-2(ReverseSort@Most@Query[All,-1]@data]"22"]@data//Keys//Append["Total"]]@dataAppend["Total"]//Query)@data//Dataset
Original Answer
Query[ReverseSort[Query[;;-2,-1]@data]//Keys//Append["Total"]]@data
One approach, calling ReverseSort only on the relevant data:
Query[ReverseSort[Query[;;-2,-1]@data]//Keys//Append["Total"]]@data//Dataset
One approach, calling ReverseSort only on the relevant data:
(ReverseSort@Most@Query[All,"22"]@data//Keys//Append["Total"]//Query)@data//Dataset
Original Answer
Query[ReverseSort[Query[;;-2,-1]@data]//Keys//Append["Total"]]@data
One approach, calling ReverseSort only on the relevant data:
Query[ReverseSort[Query[;;-2,-1]@data]//Keys//Append["Total"]]@data//Dataset