I have data in the form of 
`x = {1,3,5,6,2,4,6,4.5,2.5,2.1,5.7}; y = {3,6,2,1,8,4,3,9,11,16,9}; z = {0.001,0.004,0.012,0.005,0.002,0.003,0.018,0.09,0.007,0.005,0.009};`

    Data = {1, 3, 0.001}, {3, 6, 0.004}, {5, 2, 0.012}, {6, 1, 0.005},
      {2, 8, 0.002}, {4, 4, 0.003}, {6, 3, 0.018}, {4.5, 9, 0.09},
      {2.5, 11, 0.007}, {2.1, 16, 0.005}, {5.7, 9, 0.009};

I want to plot the 'x' and 'y' axis in ListPlot(Plotstyle->Dot) and want to add the z-axis as a bar legend against each corresponding value of X and Y.