Question $1$

The R command sample $()$ may be used to simulate random experiments. For example. To simulate the throw of a coin, the following code may be used. Run the code and submit your code and output as R Markdown document from either Callysto Hub or R Studio. Comment on each R code using R # or Markdown report or write an accompanying note in R Markilown about what each code does.

Coin.Throwsample$($c$(\text{'}$H$\text{'},\text{'}$T$\text{'}),100,$ replace$=$TRUE$)$

Coin. Throw

table$($Coin$.$Throw$)$

barplot$($table$($Coin$.$Throw$)$

Edit the code so that the graph has a main title, $x-$label, and $y-$axis label.