title: How to select the last column of numbers from a table created by FoldList in Mathematica
body: <p>I am new to Mathematica and I am having difficulties with one thing. I have this Table that generates 10 000 times  13 numbers (12 numbers + 1 that is a starting number). I need to create a Histogram from all 10 000 13th numbers. I hope It's quite clear, quite tricky to explain. </p>
  
  <p>This is the table:</p>
  
  <pre><code>F = Table[(Xi = RandomVariate[NormalDistribution[], 12];
  Mu = -0.00644131;
  Sigma = 0.0562005;
  t = 1/12; s = 0.6416;
  FoldList[(#1*Exp[(Mu - Sigma^2/2)*t + Sigma*Sqrt[t]*#2]) &amp;, s, 
  Xi]), {SeedRandom[2]; 10000}]
  </code></pre>
  
  <p>The result for the following histogram could be a table that will take all the 13th numbers to one table - than It would be quite easy to create an histogram. Maybe with "select"? Or maybe you know other ways to solve this. </p>