Homework(R01_3_1_plot)

library(datasets)
dim(iris)

## [1] 150   5

head(iris)

##   Sepal.Length Sepal.Width Petal.Length Petal.Width Species
## 1          5.1         3.5          1.4         0.2  setosa
## 2          4.9         3.0          1.4         0.2  setosa
## 3          4.7         3.2          1.3         0.2  setosa
## 4          4.6         3.1          1.5         0.2  setosa
## 5          5.0         3.6          1.4         0.2  setosa
## 6          5.4         3.9          1.7         0.4  setosa

plot(iris$Species)

plot(iris$Petal.Length)

plot(iris$Species, iris$Petal.Width)

plot(iris$Petal.Length, iris$Petal.Width)

plot(iris)

plot(iris$Petal.Length, iris$Petal.Width,
  col = "#cc0000",  # Hex code for datalab.cc red
  pch = 19,         # Use solid circles for points
  main = "Iris: Petal Length vs. Petal Width",
  xlab = "Petal Length",
  ylab = "Petal Width")

plot(cos, 0, 2*pi)

plot(exp, 1, 5)

plot(dnorm, -3, +3)

plot(dnorm, -3, +3,
  col = "#cc0000",
  lwd = 5,
  main = "Standard Normal Distribution",
  xlab = "z-scores",
  ylab = "Density")

dev.off()

## null device 
##           1

cat("\014")