Both of us are applying GMM to 1-dimensional data.
I looked at his code pretty closely, and he seems to be applying GMM to the Average Rank:
df = this.pos[,c(which(colnames(this.pos)==”Avg.Rank”))]
mclust <- Mclust(df, G=k)
He plots the data into a two-dimensional space of Expert Consensus Rank and Average Rank, but this is simply for visualization.