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("#FF63DD", 
            "#63FF9F") 
      
      
plot(Statistic, Math ,
   pch = 17,
     col = colors)

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