262025

?plot

## starting httpd help server ... done

x <- rnorm(100)
y <- rnorm(100)
plot(x,y, xlab="this is x axis", ylab="This is the y axis", main = "plot of x and y")

x<-c(1:10)
x

##  [1]  1  2  3  4  5  6  7  8  9 10

y<-x^2
y

##  [1]   1   4   9  16  25  36  49  64  81 100

plot(x,y, xlab="this is x axis", ylab="This is the y axis", main = "plot of x and y")

plot(x,y, xlab="this is x axis", ylab="This is the y axis", main = "plot of x and y", type = "l")

plot(x,y, xlab="this is x axis", ylab="This is the y axis", main = "plot of x and p")

plot(x,y, xlab="this is x axis", ylab="This is the y axis", main = "plot of x and b")

library(ggplot2)
ggplot2::mpg

## # A tibble: 234 × 11
##    manufacturer model      displ  year   cyl trans drv     cty   hwy fl    class
##    <chr>        <chr>      <dbl> <int> <int> <chr> <chr> <int> <int> <chr> <chr>
##  1 audi         a4           1.8  1999     4 auto… f        18    29 p     comp…
##  2 audi         a4           1.8  1999     4 manu… f        21    29 p     comp…
##  3 audi         a4           2    2008     4 manu… f        20    31 p     comp…
##  4 audi         a4           2    2008     4 auto… f        21    30 p     comp…
##  5 audi         a4           2.8  1999     6 auto… f        16    26 p     comp…
##  6 audi         a4           2.8  1999     6 manu… f        18    26 p     comp…
##  7 audi         a4           3.1  2008     6 auto… f        18    27 p     comp…
##  8 audi         a4 quattro   1.8  1999     4 manu… 4        18    26 p     comp…
##  9 audi         a4 quattro   1.8  1999     4 auto… 4        16    25 p     comp…
## 10 audi         a4 quattro   2    2008     4 manu… 4        20    28 p     comp…
## # ℹ 224 more rows

ggplot(data = mpg) + geom_point(mapping = aes(x = displ, y = hwy))

ggplot(data = mpg) + geom_point(mapping = aes(x = displ, y = cty))

ggplot(data = mpg) + geom_point(mapping = aes(x = displ, y = hwy, color=class))

ggplot(data = mpg) + geom_point(mapping = aes(x = displ, y = hwy, color=manufacturer))

ggplot(data = mpg) + geom_point(mapping = aes(x = displ, y = hwy, size=class))

## Warning: Using size for a discrete variable is not advised.

ggplot(data = mpg) + geom_point(mapping = aes(x = displ, y = hwy, alpha=class))

## Warning: Using alpha for a discrete variable is not advised.

ggplot(data = mpg) + geom_point(mapping = aes(x = displ, y = hwy, shape=class))

## Warning: The shape palette can deal with a maximum of 6 discrete values because more
## than 6 becomes difficult to discriminate
## ℹ you have requested 7 values. Consider specifying shapes manually if you need
##   that many have them.

## Warning: Removed 62 rows containing missing values or values outside the scale range
## (`geom_point()`).

ggplot(data = mpg) + geom_point(mapping = aes(x = displ, y = hwy), color="blue")

R Markdown

This is an R Markdown document. Markdown is a simple formatting syntax for authoring HTML, PDF, and MS Word documents. For more details on using R Markdown see http://rmarkdown.rstudio.com.

When you click the Knit button a document will be generated that includes both content as well as the output of any embedded R code chunks within the document. You can embed an R code chunk like this:

summary(cars)

##      speed           dist       
##  Min.   : 4.0   Min.   :  2.00  
##  1st Qu.:12.0   1st Qu.: 26.00  
##  Median :15.0   Median : 36.00  
##  Mean   :15.4   Mean   : 42.98  
##  3rd Qu.:19.0   3rd Qu.: 56.00  
##  Max.   :25.0   Max.   :120.00

Including Plots

You can also embed plots, for example:

Note that the echo = FALSE parameter was added to the code chunk to prevent printing of the R code that generated the plot.