Untitled

## R Markdown

Statistic <- c(68,85,74,88,63,78,90,80,58,63)
Math <- c(85,91,74,100,82,84,78,100,51,70)

colors <- c("#FFC1E0", # pink
            "#ACD6FF") # blue

plot(Statistic, Math,
   pch = 17 ,
     col = colors)

hist(Statistic, 
     col="blue",
     main="班上的統計成績",
     xlab="統計成績",
     ylab="次數")