( csortu | 2020. 02. 21., p - 13:07 )

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"