Aligning the horizontal axis of a combination chart

Questions
1

I have some data that I need to draw ListLinePlot and BarChart separately and then combine them.
My question is how to combine and align the horizontal axis correctly.

data = Table[{RandomInteger[{1, 200}], RandomReal[{0.3, 0.8}], i}, {i,
     0.3, 30, 0.3}];
Column[{ListLinePlot[data[[All, {3, 2}]], PlotRange -> All, 
   ImageSize -> Medium], 
  BarChart[data[[All, 1]], ImageSize -> Medium, AspectRatio -> 1/8]}, 
 Alignment -> Center]

plot.jpg
plot.jpg720×573 48.4 KB

2

Maybe something like this?

ResourceFunction["CombinePlots"][
 BarChart[data[[All, 1]],
  Frame -> True,
  PlotRange -> All,
  ImageSize -> Medium],
 ListLinePlot[data[[All, 2]],
  Frame -> True,
  PlotRange -> All,
  ImageSize -> Medium],
 "AxesSides" -> "TwoY"]

5402plot.png
5402plot.png450×263 21.9 KB

3

I know CombinePlots! However, I still need some way to separate the two charts! Until now, I did not find the related examples in the forums or documentation centers~~
But thank you a lot for your response~~~