R programmer

Laboratory \#1 Please review the laboratory prompt very carefully General Requirements Laboratory reports should be rendered as a PDF or HTML. file using RMarkdown and must contain the following: Grading rubric Instructions Part I We will explore Markdown formatting by writing a small report of one of our favorite movies. For this report, please include the following: - A subheader stating the title of the movie. - A four column table with the title of the movie, who it was written by, who produced it, and who starred in the movie please include one bold word, one italisized word, and one bold and italisized word. - An embedded picture from the movie using a google image derived file. - A hyperlink that will take the reader to the website the image was derived from Part II Please copy the code below into your clipboard (control + C). It is not required to understand how the code below works, but rather how to display the code in an RMarkdown document. \# In R, hashtags are used to make comments without being compiled. You will \# Learn things data = data. framel x=seg(1:16)+.1seg(1:10)sample(c(1:1),10, replace-I ), y=seg(1:16)+.2seg(1:10)sample(c(1:1),10, replace-I ) in main="A simple scatterplot" Using this code, please do the following: - Print the code using an R code chunk without displaying the output (similar to how it is viewed in this instruction) - Show the output of the code using an R code chunk without printing the code used to create it Please separate these using subheaders labeled with code and without output and with output and without code. Johnny Tsunami is a surfer from Hawaii who is forced to move to the mountains. In an effort to make friends, Johnny starts cnniwhnardina hut ruine intn trnublo inith skiers. Johnny challenges the top skier to a big race and wins! Hyperlink to website Part 2 With code and without output \# In R, hashtags are used to make comments without being compiled. You will \# Learn things like this very soon! \# Create data data = data. Frame ( x=seq(1:100)+0.1seg(1:100)sample(c(1:10),100, replace =T), y=seq(1:160)+0.2seq(1:100)sample(c(1:10),100, replace-T) ) \# Basic scatterplot plot (data $x, data $y, xlim=c(,25),yim=c(,25), pch=18 cex 2 , col ="#6963a2", xlab= "value of X,ylab= "value of Y", main = "A simple scatterplot" ) With code and without output \# In R; hashtags are used to make comments without being compiled. You wilt \# Learn things like this very soon! \# create data data = data. frame x=seg(1:100)+.1seq(1:100))sample(c(1:10),180, replace=T), y=seq(1:100)+0.2seq(1:106)sample(c(1:10),100, replace =T) \# Basie scattepplot plot (data $x, data $y xlim=c(,25),ylim=c(,25),pch=18,cex=2,col="#69b3a2", xlab= "value of X1",ylab=" value of Y, main="A simple scatterplot" With output and without code A simple scatterplot