R-ben a celestial csomag deg2dms függvénye tudja ezt:
library(celestial)
print(deg2dms(21.8687399,type='cat'))
[1] "+21:52:07.46"
print(deg2dms(21.8687399,type='cat',sep='dms'))
[1] "+21d52m07.46s"
print(deg2dms(21.8687399))
DEG MIN SEC
[1,] "+21" "52" "07.46"