I tried an answer on the post here and I had an unwanted gap (see attached picture)
1 Answer
With the help from @kglr, I managed to find a solution.
The main change to eliminate the gap PlotRange->All
data=any random matrix
data2=ArrayPad[data,{0,1}];
ListPlot3D[data2,Mesh-> Full,InterpolationOrder->0,Filling->Bottom,
FillingStyle->{Opacity[0.7]},ColorFunction->"IslandColors",PlotRange->All,
DataRange->All,FaceGrids->{Bottom,Back,Left},ImageSize->400,PlotTheme->"Monochrome",
PlotStyle->Directive[Opacity[0.9],Blue]]
PlotRange
from the definition ofpltstyl
(or change it toPlotRange -> All
) $\endgroup$