X=structure(c(1, 1, -1, 0, 1, 0, -1, -1), .Dim = c(4L, 2L))
C=structure(c(0.894427190999916, -0.447213595499958,
0.447213595499958, -0.894427190999916), .Dim = c(2L, 2L))
CIdx=conceptIndicesSkm(X,C)
dput(CIdx)
# c(1, 1, 2, 2)
}Run the code above in your browser using DataLab