> myfun<-function(x2,x4,x6,x7,x8,x9,x11,x12){m1=0.1330817307*x2+0.2378699151*x4+0.1330817307*x6+0.3494410668*x7+0.4795059670*x8-0.5686993302*x9-0.2906450889*x11-3.3149510245*x12+5.7936976484}
> o
   x2   x4  x6   x7   x8   x9  x11  x12
1 6.3 4.67 6.3 2.56 1.75 4.60 2.75 0.80
2 2.2 2.43 2.2 2.00 1.70 4.84 4.32 0.95
3 2.7 3.16 2.7 2.30 1.80 4.90 3.81 0.93
4 6.4 4.62 6.4 3.35 1.61 4.63 2.80 0.80

> myfun(o)
Error in myfun(o) : 缺少参数"x4",也没有缺省值

请问如何计算函数值呀，问题出在哪了？