title: How to make scatterplot with geom_jitter plot reproducible?
body: <p>I am using the Australian AIDS Survival Data. This time to create scatterplots.</p>
  
  <p>To show the genders in survival of different Reported transmission category (T.categ), I plot the chart in this way:</p>
  
  <pre><code>data &lt;- read.csv("https://raw.githubusercontent.com/vincentarelbundock/Rdatasets/master/csv/MASS/Aids2.csv")
  
  data %&gt;%
    ggplot() +
    geom_jitter(aes(T.categ, sex, colour = status))
  </code></pre>
  
  <p>It shows a chart. But each time I run the code, it seems to produce a different chart. Here are 2 of them putting together.</p>
  
  <p><a href="https://i.stack.imgur.com/rOEjz.png" rel="noreferrer"><img src="https://i.stack.imgur.com/rOEjz.png" alt="enter image description here"></a></p>
  
  <p>Anything wrong with the codes? Is it normal (each run a different chart)?</p>