## Not run:
# EAxyx <- c(-170.6607, 110.937, 136.2344)
# EA2EA(EAxyx,'xyx','xyz')
# EA2EA(EAxyx,'xyx','xzy')
# EA2EA(EAxyx,'xyx','yzx')
# EA2EA(EAxyx,'xyx','yxz')
# EA2EA(EAxyx,'xyx','zxy')
# EA2EA(EAxyx,'xyx','zyx')
# EA2EA(EAxyx,'xyx','xzx')
# EA2EA(EAxyx,'xyx','yxy')
# EA2EA(EAxyx,'xyx','yzy')
# EA2EA(EAxyx,'xyx','zxz')
# EA2EA(EAxyx,'xyx','zyz')
# ## End(Not run)
Run the code above in your browser using DataLab