R语言生成50名学生成绩（包含学号、性别、数学、C语言、计算机基础和英语），计算学生平均成绩并排名，计算每科最高（低）分、均值、方差，简单相关性分析

num<-seq(1:50)+18170001 #生成学号
gender<-round(runif(50,min=1,max=2)) #生成男女性别1代表男，2代表女
math<-round(runif(50,min=50,max=100)) #生成数学成绩
c.program<-round(runif(50