powered by
oFSkm(X, C, CIdx)
X=structure(c(0.707, 0.707, 0.707, 0.707), .Dim = c(2L, 2L)) C=structure(c(1, 0, 0, 1), .Dim = c(2L, 2L)) CIdx=c(2, 1) oFSkm(X,C,CIdx) # 1.414 }
Run the code above in your browser using DataLab