calc.trans(x)
x[i,j]
i
j
data(B3) calc.trans(B3$PHASEN)
Run the code above in your browser using DataLab