多维函数（含有两个变量的交互作用）：

273.7+0.03096*x1-14.88*x2-22.64*x3+2.117*x4-6.424*x5-1.816*x6-2.374*x7-1.903*x8-3.132*x9-1.221*x10+19.37*x11-0.2198*x12-0.4746*x13-0.03406*x3*x13-0.01587*x7*x13+1.174*x11*x13+1.28*x2*x3+0.0211*x2*x12+0.52*x3*x5+0.05819*x3*x7-1.556*x3*x11

约束条件：

x1<-seq(1,119,by=1)

x2<-c(3.2,3.4,3.5,3.6,3.8,4.5,4.8,5,5.8,5.9,6,7,7.2,7.3,7.5,7.8,8,8.1,8.2,9)

x3<-c(10.2,15,18)

x4<-1

x5<-seq(24,36,by=2)

x6<-1

x7<-c(1,3,10,15,30)

x8<-1

x9<-1

x10<-1

x11<-c(0.4,0.5,0.6,0.7,0.9,1)

x12<-seq(4.17,136.32,by=0.01)

x13<-c(1.5,3,4,5,6,8,9,10,12,24,25,40,50)，

希望求这个多维函数的最优解？能否用R语言求解？如果不能，能否用其他软件求解？非常感谢大家的帮助,谢谢！