请注明:姓名-公司-职位
以便审核进群资格,未注明则拒绝
写个函数:
r<-function(x,n){ #x为方针,n为整数幂次i<-1t<-xwhile(i<n){t<-t%*%xi<-i+1}t}