请各位帮忙看一下下面两个数据框程序，第一个程序运行没问题，第二个为什么就报错呢？太奇怪了，求解答,谢谢啊！！
> dataframe<-data.frame(
+          序号=c(1,2,3,4,5),
+          姓名=c("张三","李四","王五","赵六","丁一"),
+          性别=c("女","男","女","男","女"),
+          年龄=c(14,15,16,14,15),
+          身高=c(156,165,157,162,159),
+          体重=c(42,49,41.5,52,45.5)
+ )
> dataframe
  序号 姓名 性别 年龄 身高 体重
1    1 张三   女   14  156 42.0
2    2 李四   男   15  165 49.0
3    3 王五   女   16  157 41.5
4    4 赵六   男   14  162 52.0
5    5 丁一   女   15  159 45.5


> datafr<-data.frame(
+     math=c(89,85,78,60,98,94,87),
+     stat=c(88,78,69,70,75,89,94),
+     optn=c(92,87,69,94,96,88,84),
+     fina=c(76,78,89,84,92,90,87),
+ );datafr
plot(datafr)
错误于data.frame(math = c(89, 85, 78, 60, 98, 94, 87), stat = c(88,  :
  缺少参数, 也没有缺省值