You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
10 lines
218 B
10 lines
218 B
sum2 <- function(m) {
|
|
res = .C("sum2"
|
|
,mtrx=as.double(m)
|
|
,m=as.integer(dim(m)[1])
|
|
,n=as.integer(dim(m)[2])
|
|
,res=as.double(0)
|
|
)
|
|
|
|
return(res$res)
|
|
}
|